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PROGRAMMING AND OPERATION CONVENTIONS 

I. Drum Image of HSS : 

Drum cells 76000-77777 are reserved for the image of 00000-01777 
of HSS. This image is used by most service routines as temporary storage 
for part of HSS while the service routine operates from HSS. The programmer 
is advised not to load into the image as this may result in incorrect loading 
of HSS. The programmer may use this part of drum storage as a temporary pool 
or work space during the operation of his program, but in so doing deprives 
himself of the use of Changed Word Post-Mortem. 

II. Drum Storage for the Service Library 

Drum cells 70000-75700 are reserved for the Service Library and are not, 
in general, available for program use. Loading programs into the range 
70000-70037 deprives the programmer of all facilities of the Service Library, 
while loading into the range 70040-75777 may deprive him of only part of the 
Service Library. 



COMMENTS ON USE OF SERVICE LIBRARY 


. I. Paper Tape Preparation 

a) Bioctal tapes should have two 7th level punches at the very end 

f 

of the tape. 

b) Flex code (absolute) program tapes should have at least one 7th 
level punch at the very end. 

c) Flex dump tapes are suitable for reloading via Flexie. Be sure that 
a 7th level punch is present at the end of the tape. 

II. Loading Routines "Transfer Control 1 ' Option 

Both loading routines have a "transfer control" option. The following 
procedure will effect the transfer for either load routine. 

(1) Set program tape in reader 

(2) MASTER CLEAR 

(3) Set the computer on MAIN PULSE 0 . 

(4) Manually insert the following into PCR 

37 70036 70001 (2) 

(5) Set PAK = program start 

(6) START. 




PROGRAM ENTRIES TO SERVICE ROUTINES 


The block of cells 70000-70037 is reserved for entries to the service 
routines. Cell 70036 is reserved as the common exit from those service routines 
which by their nature admit program entry and exit. For example, the use of the 
Bioctal Loading Routine as a subroutine would be effected by the instruction 
37 70036 70001. All required parameter words must be placed in the appropriate 

registers before entry is made to the particular service routine by a Return 
Jump instruction. For example, the use of the Bioctal Dump would be effected 
by the following sequences 

n: 11 (x) 31000 

n+1: 37 70036 70006 

n+2 s —-- 

where, say (x) = 00 00001 01777 

CAUTION: Since the service routines each have only one entry, any 
inadvertent (or not) loading in the range 70000-70037 deprives one of all 

f 

the service routines. 



SERVICE ROUTINES 


Bioetal Loading Routine 

The routine will load anywhere. Loading into HSS and 76000-77777 can 
result in incorrect loading of HSS. A sum check is made whenever the input 
tape contains an insert to 75202, followed by a double precision check sum and 
a check address of 75204. Notes cells 75202 and 75203 will not be loaded with 
the sum. 

Operating Instructions: 

(1) Set PAK = 70001; START. 

(2) Computer halts on 56 00000 70001 after completing read in. START 
to load another tape. 

(3) Two consecutive seven-level punches in the trailer should be present. 

If these punches are not present, the following procedure may be used: 
FORCE STOP after the paper tape has passed through the reader, MASTER 
CLEAR, START at 00032. The last block of information read in is then 
stored in its proper location. 

(4) Errors 

(a) Machine prints n t" and halts. The loading routine is not in HSS 
correctly and must be restored. START causes another transfer 
to HSS. If the check fails again, reload the service library 

, onto MD. 

(b) Machine prints "c" and halts. A check address has failed. 

STARTing ignores this error and routine proceeds as though error 
had not occurred. A check address failure should not be ignored as 
it is very likely that the paper tape is in error. 

(c) Machine prints "m" and halts. Check sum has failed to agree 
with computed sum of data read in. START to ignore this error 
and continue loading. 



This routine is designed to load Flex Code tape prepared on a Flexowriter 
in the conventional fashion for translating to bioctal. It operated in the 
same fashion as the bioctal loading Routine. A sum check is made whenever the 
input tape contains an insert to 75202, 75203. (See above). 

Operating Instructions: 

(1) Set PAK = 70002} START 

(2) Computer halts on 56 00000 70002 after completing read in. START to 
load another tape. 

(3) At least one seven-level punch should be present in the trailer to 

stop the routine. If this punch is not present, the following procedure 
may be used. 

(a) FORCE STOP after the paper tape has passed through the reader. 

(b) MASTER CLEAR; set PAK = 00025} START. 

(4) Errors: 

(a) Machine prints "t" and halts. The loading routine is not in HSS> 
correctly and must be restored. START causes another transfer to 
HSS. If the check fails again, reload the service library onto MD. 

(b) Machine prints "c" and halts. A check address has failed. A START 
ignores this error and routine proceeds as if no error had occurred. 

(c) Machine prints n m" and halts. A check sum has failed to agree with 
computed sum of data read in. START to ignore the error. 
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Flex Dump 

This routine dumps the contents of consecutive storage cells on punched 
paper tape only . Automatic page editing is provided and every eighth addresB 
is given. The punched tape is suitable for re-loading via the Flex Code loading 
routine. A check sum is punched out at the end of the dump. (Al), (A^), (Q) 
are not restored or punched out. HSS is restored. 

Operating Instructions: 

(1) Enter in the address of the first cell to be dumped. 

Enter in (1^ the address of the last cell to be dumped. 

If a seven-level punch stop code is deEired at the end of the dump 
set Q 35 =1. 

(2) Turn ON the High Speed Punch. 

(3) Set PAK = 70005; START. 

(4) The machine halts on 56 00000 70005 providing a re-entry for another 
dump. 

(5) Errors: 

(a) Machine prints "t" and halts. The dump routine is not in HSS 




correctly. START causes another transfer to HSS. If the check 
fails again, reload the service library onto MD. 

(b) Machine prints "p" and halts. An illegal parameter word has 
been set up in Q end is displayed there. Clear Q manually 
and insert correct parameter; START 


(6) This routine dumps only one tape of storage at a time, either 
HSS or drum. 76000 to 76314 is used as en image region for 
00000 to 00314. 


jjioctal Pump ^ 


This routine will dump onto peper tape in bioctal form the 
contents of any specified number up to 7777g of consecutive storage 
cells in HSS or the drum except 76000-77777. A check sum is automatically 
punched at the end of the dump. A double seven-level punch at the end of 
the tape is optional. 

Operating Instructions: 

(1) Enter in ^ the address of the first cell to be dumped. 

Enter in the address of the lost cell to be dumped. 

If a double seven-level stop code is to be punched following 
this dump, set = 1. 

(2) Turn High S eed Punch ON. 

(3) Set PAK = 70006; START. 

(4) The stop at the end of the dump, 56 00000 70006, providos 
a re=entry for another dump. The contents of A and Q are 


not retained. HSS is restored at the end of the routine. 




ed Word Post Hortei 


This routine is designed to compare the contents of 00000 to 01777 
of HSS with its image at 76000-77777. T!.e image contains ( unless dis¬ 
turbed) the original contents of F.SS ce read into the computer. Those 
words in HSS which have been changed by the execution of the program 
are the only ones reported out. 

Operating Instructions: 

(1) Turn High Speed Punch ON. 

(2) Set PAK = 70013? START. 

(3) Compare halts on 56 00000 70013. 

The following will be punched in Flex Code. 

a) (Q) 

b) (y 

c) (A l ) 

d) Any changed word according to the following: 

HSS word Image word HSS address 

At the end of the routing, (A), (Q) and HSS are restored. 

(4) This routine uses the cells 74740-75137 as temporary storage 
for part of HSS while the routine operates. 

[jingle Breakpoint Stool 

This routine permits one to select a single address of a program 
which one can run on high speed and stop before executing the instruction 
at that address. One may then sample the results of computation to date 
or step through several instructions. Restriction: the breakpoint in¬ 
struction must be one which is not modified by the program. 



Opera ting In s true tions: 


(1) enter in Qy the breakpoint address. 

enter in the entry address for the program. 

(2) Sst PAX = 70016j START. The program will be executed up 
to the breakpoint at which time the computer will halt on 
56 00000 70016, providing a re-entry for another breakpoint 
stop. 


Automatic Sampler (S&m-O )J 


This routine provides for the printing or punching (in octal or 
decimal) the contents of any selected cells at selected check points. 

Output is suppressed for the first times through the check point and 

after (N^ + N g ) times. The program which is being sampled is executed 
normally between check points. It is not necessary to provide for sampling 
while writing the program. The programmer stores in any available block 
of memory a list of informstion regarding check points, ceils to be 
sampled, or scales. 

A) Operating Instructions! 

(1) Read in the program to be sampled. This is the unmodified 
problem program. 

(2) R e ad in the "Sampling List Tape". See below for description 
of this tape. 

(3) Set PAX = 70017 START. The routine sets up check points 
and transfers control to ^ which is contained in the 
sampling list. 

B) Sampling List Tape (Flex or Bioctal). 

This tape loads cell 73643 and the sampling list which contains 




a number of sublists, one for each check point. Each subliet 
contains all information necessary for sampling at one check 
point. This information may be stored in ary convenient set 
of consecutive HSS or MD cells except 00100 tiirough 00167. 

The sampling list tape format is as follows: 


Fixed Storage 


73643 XX 


one 

comp 

sub] 


Check point address 
Index Word 
Parameter words 


Lo 

Ll 

L 2 


00 

00 

Oa 


00000 

H 

«P 


c.p. 


4 



• •V- 

• • 

• 

• 

• 

• 


A- 

V» 



. Oa 

M 

p 

\ 

Sj 

End 

word 

. 70 

00000 

00000 



End 

word 

. 70 

00000 

00000 





. 00 

00000 

c.p, 





. 00 

. Oa 

£ 

H s 

s 


s 

1 



• • 

• • 

. 70 

• 

00000 

• 

00000 



70 


00000 


\ 


(1) Fixed storage - The word XX Lg read into 73643, gives the 

address of the first cell (L Q ) and the last cell (Lf) of the 
sampling list. Printing or punching is specified by XX, 61 for 
printing and 63 for punching. 

(2) Check point address - The word 00 00000 c.p. gives the csfceck 
point address, c.p. Sampling occurs before execution of the 
instruction at c.p. 

(3) Index word - The word 00 H N gives two 5-octal-digit 

P s 

numbers, H r ,, signifying the number of times the check point 
is to be passed before sampling starts, and M g , the number of 
times sampling is to occur at the check point. 




( 4 ) Parameter vorcs - These ere of the form Oa M g where the 
first octal digit is always zero. The second octal digit, a, 
tehee on the values 

Q for octal output 

1 for decimal output. 

If a^l, the parameter word is ignored. The u-portion cf each 
parameter word contains the octal address, M, of a cell whose 
contents ere to be sampled. If M = 32001, (Aj ) is sampled. 

If M is not a machine address the parameter word is ignored. 

The v-portion of each parameter word contains the binary scale 
factor, s, of the contents of M. 0^s<!70. If s>70, n 2 small. w 
is printed. 

(5) Hid words - The last two words of each sublist are of the form 
70 00000 00000 with the exception of the second end word of the 
last sublist (Lf), which is 70 00000 ^ . SAM-0 jumps to ' 
after setting up check points on a 70017 start. 

C) Output 

Shown below is an example of sampler output where the check point 
address was 00303. 

00303 

00075 12 34567 12340 

00076 77 03124 65432 

00100 1.23456789017 

00101 -321.098632812' 

00102 993059913.000 

00103 0.43210987653 

32001 14 00000 00000 

31000 37 37373 73737 


D) Restrictions 

(l) The word initially stored at a check point must be an 




Instruction$ it must not be a repert command or a repeated 
instruction and it may not be written into cr out of at ary 
time during the course of the program. 

(2) The Sampling List Tape must not load into cells 01777 or 
02000, i.e., it must be on one side or the other of this 
point. 



APPENDIX 


Paper Tape Loading Routines 


Introduction 


Paper tape is described as being divided into rows and columns: 
a single column of positions across the width of a tape is called a frame. 

Frames are divided parallel to the length of the tape into seven levels. Six 
of these levels are used primarily to represent information to be placed in 
computer storage, while the seventh level is used to represent loading directions. 
A hole punched in any of the six data levels of the tape represents a one, 
while the absence of a hole represents a zero. 

Words punched onto paper tape are of three kinds: enter data words, 
insert address words, and check address words. Enter data words are those 
which contain information to be stored internally by the computer, while in¬ 
sert address words and check address words are used only for loading purposes 
The insert address contains the address at which the first data word of a 
block of consecutive data words is to be stored, while the check address con¬ 
tains the address plus one at which the last data word has been stored. 

For a check sum of data on the tape, the following four words should 
appear on the tape after the data to which the sum applies: 

1„ Insert address 75202 

2. High order of 36 bits of check sum 

3. Low order of 36 bits of check sum 

4. Check address 75204 

The check sum must be the sum of all the data on the tape following the pre¬ 
ceding check sum. The check sum will not be loaded into 75202 and 75203. These 
words will be left undisturbed. Since a check sum test is performed whenever 
a check address of 75204 is encountered, 75204 should not be used for any other 
check address. 


Bioctal Loading Routine 1 

Words containing 12 octal digits each are punched onto bi-octal tape 
two digits to a frame. Thus, six frames of tape are necessary to represent 
one bi-octal coded word. When the bi-octal loading routine is used, the three 
kinds of words described above are distinguished by the fames in which seventh 
level holes are located. Each enter data word must have a seventh level hole 
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in the sixth frame. Insert address words and check address words also have 
seventh level-holes in the sixth frame, but in addition, the insert address 
has one in the third frame and the check address has or.e in the fourth frame. 
Furthermore, should there be a gap on the tape between the two blocks, a 
seventh level hole must be punched in the frame directly preceding the first 
frame of the next insert address word on the tape. This also applies to the 
very first block of data on the tape. The tape should always begin with an 
unpunched leader of about 10 inches, and should end with an unpunched trailer 
of about the same length. A seven level punch in any two consecutive frames 
of the trailer directs the Bioctal Loader routine to store the data read in 
thus far, transfer the location 76000-77777 to 00000-01777, and come to a pro¬ 
grammed stop. 

The following is a diagram of b tape bearing the two data words 
671234007252 and 00777701232, which are to be stored at address 01001 and 01002 
respectively. 
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Flex Code Loading Routine 

Input tapes using this loader are usually prepared directly from 
the electric typewriter (Flexowriter) in coded form, one character to a frame. 

In order to obtain a correct loading format, it is important that periods be 
used only in standard positions. 

Each data word must consist of twelve octal digits between two periods 
These twelve digits are grouped as follows: two digits followed by a space, 
five digits followed by a space, and the last five digits followed by a period 
and carriage return. Insert and check addresses also consist of twelve digits 
but have periods and digit groupings that are peculiar to each. An insert 
address reading from left to right is composed of a period, six zero digits, a 
period, a zero, and a five digit address followed by a period and carriage re¬ 
turn. A check address is grouped from left to right as follows: seven zero 
digits, the most significant digit of a five digit address, a period and the 
remaining four digits of the address followed by a period and carriage return. 




Example: 


( Insert address .000000.076050. (address of first data word) 

Data word 00 00400 00500. 

Check address 00000007.6051. (address following last data word) 

Incorrect word format will result in that word not being interpreted correctly, 
or not being stored in its proper location. Errors of this type will usually 
show up as check address failures. 

One seven level punch should be used at the end of the tape after 
the last check address to stop the reader and complete the routine. There 
should be no other seven level punch since any such punch will halt the reader 
regardless of its position on the tape. 



IJSEful Note Number 2 


1 November 1956 


SUBJECT: APL Complex Arithmetic Package 
(Not a standard USE routine) 


This subroutine converts the 1103A temporarily to a machine with 
three-address logic, separate storage for instructions and data, working 
on complex floating point numbers. At each entry it can handle interpre¬ 
tive programs containing up to 512 instructions and up to 512 data. 

The data are in the form Z = x + iy, where x and y are standard 
1103AF floating point numbers and are stored in two successive machine 
storage cells. 

The instructions are in the form 

op L ABC, 

where op is a 2-octal-digit operation code, L is an address modification 
index of 1 octal digit, and A, B, C are each 3 octal digits indicating in¬ 
struction addresses, data addresses, or integers, according to the opera¬ 
tion code, lach instruction therefore consists of 12 octal digits and can 
be stored in one machine storage cell. 

If u is the actual machine address of the first cell used for 
data storage and v is the actual machine address of the first cell used 
for instruction storage, then the relation between machine addresses and 
pseudo-addresses is as follows: 


Data 

Instructions 

u + 0] 000 

v + 0 

000 

u + 1J 

v + 1 

001 

u + 2) 001 

v + 2 

002 

u + 3J 

etc. 


u + 41 002 



u + 5j 



etc. ^ 




The instruction stored at instruction address 000 (i.e. at ma¬ 
chine address v) is the first one executed when the complex arithmetic 
package is called in by writing 


RJ R L016 
00 u v 
NI 


4 
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The pseudo-instruction8 


00 0 000 000 000 

01 L A B C 

02 L A B C 

03 L A B C 

04 L A B C 

05 L A B C 

06 L A B C 

07 L A B C 

10 L A B C 

11 L A B C 

12 L 000 000 C , 

13 L A B C 

14 L A B C 


Leave the interpretive system and execute NI in basic 
machine language. 

Perform the operation indicated hy the code A upon the 
contents of data address B and store the result at data 
address C. (See Table 1) 

Add the contents of data address A to the contents of 
data address B and store in data address C. 

Subtract the contents of data address B from the contents 
of data address A and store in data address C. 

Multiply the contents of data address A by the contents 
of data address B and store in data address C. 

Multiply the contents of data address A by the contents 
of data address B, reverse the sign of the product, and 
store in data address C. 

Divide the contents of data address A by the contents of 
data address B and store in data address C. 

Set the contents of data addresses A, B, and C equal to 
zero. 

Here A is an integer. Transfer A consecutive data from 
the block starting at data address B to the block start¬ 
ing at data address C. In case the two blocks overlap, 
no datum is overwritten until after it has been transferred. 

Here A is an integer. Transfer A consecutive instructions 
from the block starting at instruction address B to the 
block starting at instruction address C. In case the two 
blocks overlap, no instruction is overwritten until after 
it has been transferred. 

Transfer control to instruction address C. 

Put the three octal digits A in the C-address portion of 
the instruction at address B and transfer control to in¬ 
struction address C. 

Put the three octal digits A in that portion of the in¬ 
struction at address C which is indicated (see Table 2) 
by the code B. 
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15 L A B C Add the integer A to that portion of the instruction 

at address C which is indicated (see Table 2) by the 
code B. 

16 L A B C Subtract the integer A from that portion of the in¬ 

struction at address C which is indicated (see Table 
2) by the code B. 


17 L A B C Here A and B are integers and C is an instruction ad¬ 
dress. Add one to A. If then A < B jump to instruc¬ 
tion C. If, however, A^-B then subtract B from all 
those addresses (in all instructions from the C-th to 
the one preceding this one) which were modified as a 
result of an L-code different from zero. Then set 
A“000 and take next instruction. 


20 L A B C If the contents of data address A are less in absolute 

value than the contents of data address B then transfer 
control to instruction address C; otherwise take next 
instruction. 

21 L A B C If the real part of the contents of data address A is 

negative, transfer control to instruction address B; 
otherwise transfer control to instruction address C. 


22 L A B C 


If the imaginary part of the contents of data address 
A is negative, transfer control to instruction address 
B; otherwise transfer control to instruction address C. 


The L-code 


The L-code of three bits in each instruction permits any of the 
addresses in that instruction to be increased by one each time the instruc¬ 
tion is carried out, as described in Table 3* This increase of addresses 
is done after the operation is carried out but before going on to the next 
instruction. 

The L-code for each instruction, together with the loop instruc¬ 
tion 17LABC, provides a very simple and surprisingly versatile method for 
coding loops. The following almost trivial example may help to indicate 
how the coding might go in more complicated and more interesting cases. It 
shows, in particular, that loops within loops can be handled with a mini¬ 
mum of step and reset operations. 
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5 i 

™ S 3.4 Zb-; 4 Xj 
i-1 J-l J J 


Data address 




100-104 

X1-X5 




105 

hn 




106-107 

b 21" b 22 




110-112 

b 31“ b 33 


-* 


113-116 

b 41’ b 44 




117-123 

b 51“ b 55 




124-130 

a l -a 5 




131 

b U x j 




132 

S b ij x 3 




133 

a i Sb ij x j 




134 

2 a i ^ b ij x j 

=y 

Instruction 

address 

0£ 

L 

ABC 

comment 

100 

14 

0 

105 100 103 

reset 

101 

07 

0 

134 134 134 

clear 134 

102 

07 

0 

132 132 132 

clear 132 

103 

04 

6 

105 100 131 


104 

02 

0 

131 132 132 


105 

17 

2 

000 001 103 

loop 

106 

04 

4 

124 132 133 

a i ^ b ij x^l33 

107 

02 

0 

133 134 134 

S a i^ b ij Xj-j-134 

110 

15 

4 

001 100 103 

step 

111 

17 

0 

000 005 102 

loop 


4 
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Relation to USE program 

The subroutine here described is being coded in a form somewhat 
different from the USE standard form for local convenience. It will be 
noticed, for example, that the parameter word 00 u v is put after the re¬ 
turn jump used to call in the subroutine rather than, for instance, in the 
accumulator; this can of course easily be changed If desired. The other 
departures from standard (such as use of local sub-subroutines for mathe¬ 
matical functions, etc.) are in much the same category now that the standard 
compiler permits subroutines to call in other subroutines. In short, the 
conversion to standard USE form could easily be made if the organization 
wanted it done. 

The logical portion of the subroutine, which interprets the opera¬ 
tion codes and does the housekeeping, has purposely been kept separate from 
the mathematical portion, which actually does the addition, subtraction, 
etc. This was done so that the same logical portion could serve for dif¬ 
ferent arithmetics, such as real floating point double precision, real stated 
point double precision, complex double precision, matrix arithmetic, etc., as 
the required mathematical coding for the several operations becomes available. 
The advantage of a common logic for these various kinds of arithmetics needs 
no insistence. 

If USE decides not to include this among the standard routines, the 
coding in present form will be made available (when checked out) to any indi¬ 
vidual members upon request. In any event, APL will welcome suggestions and 
criticisms. 

Acknowledgement 

The debt owed by the present routine to the interpretive system 
devised by Bell Telephone Laboratories for the IBM 650 (see IBM Tech. News¬ 
letter No. 11) will be obvious to those who are familiar with that system, 
and is hereby brought to the attention of those who are not. 
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Table 1; Operations performed by 01LABC 


A 

Operation performed on contents of B 

OOO 

absolute value 

001 

exponential 

002 

logarithm (principal value) 

003 

conversion rectangular to polar form 

004 

conversion polar to rectangular form 

005 

multiply by -1. 
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Table 2; B-codes for operations 14. 15. 16 


B (octal) 
000 
001 
010 
011 
100 
101 
no 
in 


Portions of inatruction C which are modified 
none 

C address 
B address 
B and C addresses 
A address 
A and C addresses 
A and B addresses 
A, B and C addresses. 


i 
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Table 3: 


L-codes 


L (octal) 
0 
1 
2 

3 

4 

5 

6 
7 



L (binary) 
000 
001 
010 
Oil 
100 
101 
no 
m 


Addresses affected 
none 

C 

B 

B, C 

A 

A, C 
A, B 
A, B, C 


i 
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Execution Times 
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PRELIMINARY INFORMATION 


ON THE 

CONTENT OF REGISTERS OF THE 
1103A FLOATING POINT INSTRUCTIONS 


Dates 15 October 1956 

Prepared by: P. Warburton 

Issued byt Systems Analysis Dept. 

Systems Group of Univac Scientific Applications 





October 12, 1956 


The layout of the "Floating Point Content of Registers" is not the same 

as that of the fixed point instructions. There are more conditions affecting 

the final content of A. First, hae the NEFF been set or cleared by instruction 

05? Second, what is the relative size of (u) and (v)? For these reasons, only 

the Pack and Unpack commands are in the usual format. Since the arithmetic 

Floating Point commands do not change (u) and (v), (u)^ and (v)f are not included 

in the Contents of Registers of operations 64, 65, 66, 67, 01, and 02. 

The binary point of floating point numbers is usually between the twenty- 

eighth and the twenty-seventh place. After the arithmetic pseudo-normalizing 

process, the mantissa is in A^, and the binary point is between A^ and A^. 

It may or may not be normalized. The position of the most significant bit 

(MSB) indicates what has occurred. If normalized, the MSB will be in A^. 

The value of the significant bits depends upon whether rounding has 

occurred. Rounding in effect adds an extra bit to the value of (a) at A„ r 

35 

(unless the addition of the rounding bit carries into A^, in which case the 
final left shift is omitted and the rounding bit remains added to the value 

of A 34* 

The value of (Q )f will be either (l) the normalized rounded, and packed 
result (NRP), or (2) the pseudo-normalized result (PN). 

NOTE: If A or Q is the v-address of any floating point command other 
than the pack or unpack command (A) or (Q) will be destroyed by the Unpack 
(u) sequence before the unpack (v) sequence is reached. 






Instruction* Floating Add (FAuv) 


Operation* 


64 


1 


Function* Form in Q the normalized rounded and packed floating point sum 
of (u) and (v). 


HE 


Arithmetic 


(A) f 


<Q)< 


FF 

Conditions 


Value of significant 
bits 

0 

(u)> (t) 


A 62 

( % ).2 (nc) * 

<Te, + v 


(u)-4 (v) 


A 62 

<V-* (TC) ' 

<nc) + (%) 

1 

i 

' 

(u)£ (v) 

( u e)”( v c) 2 2 

( u c M v o)< 2 

‘61 

A6l“ A 33 

- 

<t => + (, D ) 

<v<;) +(? m ) 


(u)^- (v) 

(v c )”(«c) — 2 

(▼<*)“(uc) * 2 

A 6l 

A 61" A 33 

1 1 

► > 

CM '"f'i 

• •' 

/“S 

•£ >s 

(uc) +K) 


{Round 


Norm Value 



NRP 


NRP 


(u) + (v) 


(u) + (v) 


no 

no 


no 


PH 

PN 


(u) + (v) 
(u) + (v) 


PH 


no 


PN 


(u) + (v) 
(u) + (v) 




























Instruction: Floating Subtract (FSuv) 


Operation: 


65 


Function: Form in Q the normalized, rounded and packed floating point 
difference of (u) and (v). 


NE Arithmetic 
FF Conditions 


(u)(v) 

(u)<4 (▼) 





1 (u) > (t) (u c )-(v c )>2 

(u c )“(v c 


(u)^- (v) (v c )-(u c )>2 

(v c )-(u c X2 



Value of significant 
bits 

Round 

Norm 

Value 

( Ub ). 2 (Uo) * (T °)-(v B ) 

yes 

NRP 

(u) - (v) 

(v n ).2 (To) ' (Uc) -(« B ) 

yes 

NRP 

(u) - (v) 

(Ub ). 2 (“c) - (Vc)-(v n ) 

no 

PN 

(u) - (v) 

(» b )- 2 <Uc) 

00 

PN 

(u) - (v) 

(v m ). 2 ( ’c) - («c).(^) 

no 

PN 

(u) - (v) 

(v m ).2 ( ’' c) - (u<:) -(oJ 

no 

PN 

(u) - (v) 




















Instruction: Floating Point Multiply (MPuv) 


Operation: 


Function: Form in Q the normalized rounded and packed floating point product 
of (u) and (v). 


HE Arithmetic 
FF Condition 


1 

(%) * (v ffl ) 


(A) f 

(Q) f 

Value of significant 
bits 

Round 

Norm 

Value 


yes 

1 

KRP 

(u). (v) 

(«n)^ v m) 

no 

PN 

(u). (v) 

1 

no 

PN 

(u).(v) 
























Instruction: Floating Point Divide (FDuv) 


Operation 


67 


Function: Form in Q the normalized, rounded and packed floating point 
quotient of (u) -f- (v) 


K Arithmetic 
FF Condition 


1 <V -r W m ) £ 1 

«f < v m) ^ 1 


(A) f 

Value of significant 

Round 

bits 


(u B > -j- <T ») 

yes 

{u *> ( v m> 

no 

K») ~ ( v m) 

_ 

no 


(u) -r (v) 
(u) *r (v) 






















Instruction: Floating Point Polynomial Multiply (FPuv) 


Operation: 


01 


Function: Form in Q the sum of (v) and the product of (Q)^.(u) 

(HE FF should be cleared for the execution of this 
instruction. If it is not the product mantissa 
will be rounded not with one, but with (A L ).) 


NE Arithmetic 
FF Condition 


(Q) (u) > (v) 
(Q) (u)Z. (v) 


(A) f 

(Q) f 

Value of mantissa 

Round 

Norm 

Value 

«3u) m .2 (Qu) -=-<’c>+(v B ) 

| 

yes 

NRP 

(Qj^uj + Cv) 

, . (v c MQu) c , x 

(v m ).2 +(Qu) m 

yes 





















Instruction: Floating Point Inner Product (FIuv) 


Operation: 


02 


Function: Form in Q the normalized, rounded and packed sum of (Qj) and 
the product of (u) and (v). 

(HE FF should be cleared for the execution of this instruction; 
if it is not, the product Mantissa will be rounded, not with 
one , but with (A^).) 


Arithmetic 
FF I Condition 


(Q)l > (u) (v) 
(Q) 4 (u) (y) 




<A) f 

(Q) f 

j Value of significant Round 

Norm Value 

bits 



<Qm) 1 .2 (Qc)l -< OT ><= t (uv), 

yes 

HRP (Q)i+(u)(v) 

( 1 nr m ).2< w )c-(Qc) i+ (Qm) 1 

yes 

HRP (Q^+faMv) 
















Operation 


03 


Instruction: 


Function t 


Floating Point Unpack (UP^v) 


Unpack (u) replacing (u) with (t^) and replacing (v c ) with 
(u Q ) or its complement If (u) is negative. The characteristic 
portion of (u)^ contains sign bits. The sign and mantissa 
bits of (v)f are cleared to zero. 


Storage 

Contents of Register & Storage Position After Operation 

Class 

22 

55^ 

(Q) f 

B 

V 

u 

| 


Value of bits 

Round 

- 

MC 

or 

MD or MC 

(u ) 
m 

< u c> 


No change 


No change 

KD 

A 

(V 

— 

hi* 

<“c> 

no 

No change 

' ’? 

Q 

(V 

— 


No change 


< u c> 


MD or MC 

__ 

(n c> 

A 26 

(Vi 

no 

No change 

A 






*• 



A 

— 

— 

A 34 

<Vi 

no 

No change 

i 

Q 

— 

—- 

h.6 

(Vi 

no 

<*c>i 


MD or MC 

— 

(u c> 


No change 


(Vi 

Q 

A 

— 

— 

A 34 

<9c>i 

no 

(Vi 


<Qc>i 


Q 


No change 

























Instruction; Normalize, Round, & Pack (NPtiv) 


Operation: 


Function: 


Replace (u) with the normalized rounded packed floating point 
number obtained from the possibly unnormalized mantissa in (u)^ 
and the biased characteristic in (v) c . 

It is assumed that (u)^ has the binary point between U 27 and tU/ 
((u) A is scaled 2 "^'). 


Storage 

Class 


ntents 


sters & Storage Posltl 


(MC) c or (MD) f 


HD or MC NRP(u)+(v c ) 


NRP(u)+(v c ) 


HRP(u)+(v c ) 





MSB 

Value of bits F 

A 62 


A 62 


A 62 


A 34 

NRP(%)i+(v c ) 

A 34 

SR ^ > ( A r) i + ( A Rc)i 

A 34 

HRP(AR)i + (Qc) 


No change 



w f ’ 


yes No change 

yes No change 

yes No change 



yes HRPfQ^+O^) 

yes NRP(q) i +(A Rc ) i 

yes NRP(Q) 1 +(Q c ) i 


























Instruction: Floating Point normalize Exit (NEj) Operation: 05 


Function: If J=0 clear the normalize exit flip-flop (designated NFF); if j-1 
set HFF to 1 

(a) The results of setting NFF te 1 is set forth in the 
"Contents of Registers" 

(b) When NFF is set to I, it will remain set until cleared 
by another NEJ - instruction 

> 

(c) NFF must be cleared for FP, FI, and IP instructions 
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SUMMARY OF EXECUTION TIMES 



Max. 

Min. 

Floating add and subtract (N — 1) 

300 //sec. 

144 //sec 

(N) = (u c ) - (v c ) (N 2 . 2 ) 

236 

148 

Floating multiply 

380 

162 

Floating divide 

654 

648 

Floating polynomial multiply 

619 

262 

Floating inner product 

637 

280 

Floating unpack 

52 

54 

Floating normalize pack 

18C 

144 

Normalize exit 

20 

20 


All times given include magnetic core reference time. If (u) is A, 
subtract 6 //sec.j if Q, subtract 4 //sec. All cases are for NE FF set to 
aero. If NE FF = 1, set K = 0 and subtract 12 //sec. All cases include 
rounding. If the full number of normalizing shifts are made (35 for addi¬ 
tion and subtraction, 2 for multiplication and division), the mantissa is 
zero and rounding is omitted. For this case, subtract 14 /<sec. 

The following symbols are used in the formulas. 

N = (u c ) - (v c ) for operations 64, 65, 66 , and 67 

N = (Qu) c - (v c ) for operation 01 

N = (uv) c - (Qj.) for operation 02 

Ng is the sign of this difference (corresponding to S 9 at the 
points when (S) = (u c ) - (v c ) 

or (S) = (Qu) c - (v c ) * 

or (S) = (uv) c - (Qq) 

K is the number of normalizing shifts (the number of shifts necessary 
to put the MSB of the arithmetic result of (t^) and (v B ) in A^ — maximum 
of 35 for addition and subtraction, 2 for multiplication and division). 



Floating point add and subtract (FAuv and FSuv) 


MP 0 (Unpack (u) sequence) 

1 (Unpack (▼) sequence) 

2 (Initial alignment) 

3 (Pinal alignment) 

5 (HRP sequence) 

6 47 (Set up NI) 

Total (in clock pulses) 
Total (in //sec.) 

Case I 
B=0 


7 + 2(u 35 ) 

7 + 2 (^ 35 ) 

1 +3(89) , 

4 + 2(89) + 2 H| 

12 + (34 -|N|) + 2 K 


38+2(u3 5 )+2(v 35 )+5 (» 9 )+2| N|+(34- |h| )+2K 
76+4(u 35 )+4(v 35 )+10 (H 9 )+4|H| + (6>S-2j H |)+4K 


Case II 
8=1 


Max. 

76 

4 

4 

10 

0 

68 

298 // sec. 


Min. 

76 

0 

0 

0 

0 

68 

_0 

144 // sec. 


Max. 

76 

4 

4 

10 

4 

66 

3 C 0 // sec. 


Min. 

76 

0 

0 

0 

4 

66 

0 

I 46 /< sec. 


Case III Case IV 

8=2 8=34 


Max. 

Min. 

Max. 

Min. 

76 

76 

76 

76 

4 

0 

4 

0 

4 

0 

4 

0 

10 

0 

10 

0 

8 

8 

136 

136 

64 

64 

0 

0 

_Q 

_o 



166 // sec. 

148 /fsec. 

230// sec. 

212 // sec. 


N £ 1, Maximum time: 300 /4 sec. 

Minimum time: 144/4 sec. 

N > 2, Maximum time: 236/4 sec. 

Minimum time: I 48/4 sec. 

Note: In cases I and II, maximum addition times are 4/<8ec. less them shown. (If 
(u) and (▼) are both positive, K = 0.) 






Floating point multiply (FMuv) 


HP 0 (Unpack (u) sequence) 

1 (Unpack (v) sequence) 

•2 (Multiply sequence) 

5 (HUP sequence) 

6 & 7 (Set up HI) 

Total (clock pulses) 

Total (//sec.) 

Maximum time: 380//sec. 

Minimum time: 162// sec. 

•If (u) is negative, the complement of 
is always zero, and (Q 2 6 - 0 ^ 


7 + (U 35 ) 

7 26 

4° + + 2( u 3^ 1 o) 

20 + 2 k 

1 _;_ 

81+(u 35 )+4^ (u 3 ) 42 (u 3 ^»o) + 2 k 

162+2 (U 3 5 )+8*1^ ^ u 3^4. ) + 4(u 3 ^Uq )+4k 


(u) is sent to Q. Therefore, 
the complement of ( u 2 6 _o^* 


Floating point divide (FDuv) 


MP 0 (Unpack (u) sequence) 

1 (Unpack (v) sequence) 

2 (Initial shift of (u) 

3 (Divide sequence) 

4 (Q —* A sequence) 

5 (NRP sequence) 

6 & 7 (Set up HI) 

Total (clock pulses) 

Total (//sec.) 

Maximum time: 654 //sec. 
Minimum time: 648 //sec. 


7 

7 

36 

222 

6 

39 

_1 


+ (035) 


+ 2k 


324 + (u 35 ) + 2 k 
648 + 2(u 35 ) + 4k 


* 







Floating point polynomial multiply (FPuv) 


MP 0 (Unpack (Q) sequence) 

1 (Unpack (u) sequence) 

2 (Multiply sequence) 

(3) (NRP (Q) • (n) sequence) 

(4) Onpack (v) sequence 
y- (initial alignment) 

4 1 (Final alignment) 

5 (NPP sequence) 

6&7 (Set up HI) 


5 + (Q 35 ) 

40 + 4 ^ (Q 35 ©%) + 2 (Q 35 ©uo) 

U 

7 + (v 35 ) 

1 + 3(1*9) 

4 + 2(Hq) + 2|N| 

12 + (34 - |N|) + 2 K 

_2 _ 


Total (clock pulses):97+(Q 35 )+4ZT(Q 35 Ai i )+2(Q 35 «b c )+5(N 9 )+2|H|-f(34-|N|)+2K 


Total (/^8ec.):194+2(Q 35 )te^'(Q 35 fii i )+4(Q 3 ^tio)+5(H 3 )+4|N|+(6S-2|N|)+a 


Maximum and minimum times depend upon the value of N as veil as (Q)< 
(See the four cases given under Floating add and subtract.) 

Taking the largest maximum (M=l) and the smallest mnimum (N = 0), the 
maximum and minimum time are: 


Maximum time (N = 1): 619 /< sec. 
Minimum time (N = 0) : 262 /i sec. 








Floating point inner product (FIuv) 


HP 0 (0—>F^ sequence) 

1 (Unpack (u) sequence) 

(2) (Unpack (v) sequence) 

(3) (Multiply sequence) 

(4) (HRP (u) • (▼) sequence) 
(Unpack (F,) sequence) 

3 , (Initial alignment) 

4 1 (Final alignment) 

3 (HRP sequence) 

6*7 


7 

7 + (u 35 ) 

40 + 4^ (u 35 © i^) + 2 (u 35 © Uq) 

7 

1 + 3(Hq) 

4 + 2(RA) + 2|H| 

12 + (34 -IH) + 2K 

_2 _ 


Total (clock pulses) :106+(u 35 )+4^(u 3 ^Bu i )+2(u 3 ^®u 0 )+5(S 9 )+2|I|+(34-|H|)+2K 
Total <A sec. ):212+2(u 35 )+6^(u 3 ^®i 1 )+4(u 3 5®u 0 )+100*^+4) H|+(68-2|N| )+4K 


Maximum and minimum tines depend upon the value of N as well as (u). 

(See the four cases given under Floating add and subtract.) 

Taking the largest maximum (H = 1) and the sea lies t ninimra (N = 0), maxi aura 
and minimum times are: 

Maxima: (H = l): 637 /t sec. 

Minimum (H = 0) : 280 /i sec. 







Floating point unpack (UPuv) 


MP 0 (Unpack (u) sequence) 7 + (**35) 

1 (Ug —* m sequence) 5 

2 (u c —* s sequence) 1 

5 (u c —> v sequence) 5 

647 (Set up HI) _8_ 

Total (clock pulse) 26 + (u^) 

Total (/r sec.) 52 + 2(u^^) 


Floating point normalize pack (HPuv) 


MP 0 (Read (v) sequence) 

1 (v c —-F c sequence) 

2 (Read (u) sequence) 

3 (u —» A sequence) 

4 (NRP sequence) 

5 (Write in (u) sequence) 
6&7 

Total (clock pulses) 

Total (yV sec.) 

Maximus tine: 180 M sec. 
Minimum time: 144 /i sec. 


7 

1 

7 

3 

39 + 2K 

7 

8 _ 


72 + 2K 

144 + 4K (9 * K 2.0) 


Floating point normalize exit (NEj-O 


MP 0 (Clear x) 1 

1 (Set HE FF 1 

5- 1 

6&7 _2 

Total (clock pulses) 10 

Total (/f sec.) 







USEful Note Number 4 


November 10, 1956 


SUBJECT t Revision of the Card Package Routine (RR) 


By the following modifications the Card Package Routine (CV37), 
which was written for the 1103, has been made useable on the 1103A* 


A and Q Addresses 

Accumulator and Q-regieter addressee have been modified to the standard 
address of each for the 11Q3A as follows! 

A - From 20000 to 32000 
Q - From 10000 to 31000 


IOB Master Selection Bit 

The IOB Master Selection Bit for the Card Unit has been changed from 
I0B6 for the 1103 to IOB35 for the 1103A. This change has been accomplished 
by modification of the instruction in which the Master Bit is introduced. 
This modification for the Card Read Routine and the Card Punch Routine now 
reads s 


Read Routine - 72163 00161 01013 
Punch Routine- 72361 00357 01007 


31 01211 00036 
31 01163 00036 


Check Sum 

A revision ^of^the check sum for the transfer of the Card Package 
Routine to the has been made because of the above mentioned revisions 

throughout the routine* Thus the contents of the drum address 72313 now 
reads! 


72313 00311' 01143 23 72111 72133 




CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
• AN DIEGO DIVISION 

CV-37 


CARD PACKAGE ' IC 001 


PAG * IC 001-1 

REPORT NO ZM*ii 


MODEL All 
date 1/7/55 


The Card Package Routine punches out on bioctal tape 
either of the card routines described below. The card 
routine punched out is modified according to a (specified 
ES operating nddreoB ( address of the firBt word of the 
card routine as it is stored for use in E8 ). In addition, 
the bioctal tape is punched with a specified insert 
address ( storage address ) which may or may not be the 
same as the ES operating address. 

The Card Package sumo Itself after transfer to ES. 

If an improper sum is obtained, ''SUM" is typed out 
by the supervisory typewriter and the 1105 stops. The 
routine tests the control word— if it is not suitable, 
a new control word is asked for by typing out ‘‘set q" . 


OPERATING INSTRUCTIONS 

1) Put 1103 in te3t mode. 

2) Set PAK «* 72000 and start. 

3) a. If "SUM" types out, reread tape and rerun, 
b. If " set q" types out, set up control word 

in ( Q ). 

4) Control word* 

( Q ) - X0 MMMMM mrammm 

X ■> 1 for card read routine. 

X » 2 for card punch routine. 

M » desired.insert address. 

00000 i M .< 01777 
40000 < M ( 77777 

m - desired ES operating address. 

00000 Cm $01541. 

5) Turn on paper tape punch and start. 

If X / 1 or 2, or if M or in is not in the proper 
range, the routine asks for a corrected control word. 

Either card routine requires 235 octal words of ES 
in which to operate, constants and temporary storage 
iaoluded. 

The Card Package doos not use the constant pool. 

ES is used and not restored. 


Drum addresst 


72000 - 72531 








NO II < f 


CONSOLIDA1 ED VUITEF AIRCRAI T CORPORATION 
• AN r>lf <;c> DIVISION 

CARL' READ ROUT INK 

Thin subroutine onuoec the Dull Reproducer to go through 
i\ read cyele. The .)• - * 1 ml infornwt Ion from tiie Bull 
Re producer in convert ed to blimry end r> ;aled accordlrig to 
B given Beni lug factor. The renui t.» are then stored in 
spec ti led KI5 memory lo uit. Iona. 


i-a.,1 IC 001-2 
ut por i'NO Z11-L91 
mo nr i All 
da rr I/7/T5 


CARD PUNCfl ROUTIDL 

Thlr suboutlne converts specified binary numbers Into 
decimal and sends equivalent coded-de-• Inal Information 
to the Dull Reproducer and causes It to go through r 
punch cycle. 


These card routines require the following information; 

1) Binary scaling. 

2) Decimal scaling. 

3) Locations of fields on the card. 

L) Zero suppression ( punch only ). 

“’This information in supplied to the card routine in a 
standard form called a parameter word. One parameter 
word is required for each card field. 

A field consists of a number of consecutive card 
columns. The last column of a field is reserved for the 
sign of the decimal number stored in that field. An 
11-punch signifies a negative number, no punch ( blank 
column ) signifies a positive number. A combination 
12, 3 end 8 punch in one column represents a decimal, point. 

Fields need not be adjacent— there may be unused 
columns, punched or uupunched, between them-- nor need 
they be alike in size. 

Dither card routine is entered from line y as 
follows: 

y ) 37 mmmrun :mm ( to card routine ) 

y+1 ) AB PPPFP DDDDP ( control word ) 

yi2 ) Next Instruction 

iu represents the beginning address ( ES 
operating address ) of the card routine 
to be used. 

The control word 1 b described below. 

Ibe 37 command records in m the address of the control 
word. The routine is then entered at m. After finishing 
its operation, the cord routine exits to yH-2, the line 
following the control word. 


4-40 





con soi iniun vuitif airt raf t corporation 

SAN mi Go DIVISION 

'.v-r/ 

CONTROL WORD 

The control word controls the operation of the card 
routines. Its composi tion 1 e uo follows: 

AB PFPFP DDDDD 

A, the first octal digit, controls positioning 
of cards in tne read and punch channels of 
the Bull Reproducer. 

A = 1 Pick a read card from the read 
hopper. 

/ -* I 1 Pick a punch card from the punah 
hopper. 

B, the cecond octal digit, controls the operation 
to be performed. 

B >= 1 Read a card. 

B «= 2 Punch a card. 

P i6 the address of the first parameter word. 

D is the address of the first data word. 

P ar.d D both must be ES addresses. 

The t -vble on page 5 lists the combinations of 
operations that may be performed by the card routines. 


t’AGfc 
R E PO R 

MODEL All 

DATE 1 /f/'15 


PARAMETER WORD 

A parameter word consists of twelve octal digits 
divided into six groups of two each: 

FF SS BB LL RR ZZ 

FF: Flag for final parameter word. 

FF - 77 octal for final word. 

FF - 00 otherwise. 

BSi Binary scaling factor. ( number of bits 
to the right of the binary point ) 

BB: Number of blank or unused columns to the 
left of the field. 

LL: Number of digit positions to the left of 
the decimal point. 

RR; Number of remaining columns in the field, 
exclusive o. sign. ( number of decimal 
digits to the right of the decimal point 
plus one for the decimal point ) 

RR - 00 indicates no decimal point and 
no decimal fraction. 

4-4J 




l.t >N<*OI IDA 1 f (» VI 14 Iff AI Me MAI I t O W I* OR A NON j C-i 1 i' 

HAN Dll f»() OlVIMi IN * ,>A ' iO ** t 

U" 7 J.;::i 1 - 24-55 Nl ' k r jj 

: ag Tor zero 30ppX*esslon. 

/’/I * 77 octal for zero suppress 1 GiV.‘ 

77 ■» 00 Tor no zero suppreunion. These 
two dl.rJt.H are' »1.-'■•odr.-d by trie punch routin'- 
only. Only /.'roc. In the Integer part a: 
suppressed. A zero immediately proceed ini', 
thr dee 1 mal point 1.a not suppr' aged. 

Hanj • of t he puramet.t rr ,: 


1 ran t 


octal 


00 •. O ' $ y\ 

00 $ UN ; ' 

00 < hi t 10 
l.i; > HR * 1 J 
•1 * L.L+RR < J 1 


00 ? 77 < 43 
00 < BC ; 77 
00 0 LL < 12 
00 • Rf< : 13 
01 i TL+RR < 1 j 


The paramet-r word a, one for each Tleld, moat be stored 
conne utively startinr at some memory location ?. 

There must be an equal number oh consecutive words 
starting with some 77 memory location D, reserved for 
a tor in. the results of tie n. ad routine, or filled wit: 
iata ■ the punch routine-. 


hunching takes place at the third card station In the 
punch hannel, therefore two punch card3 must be advanced 
before punching can take place. This car. be done 
manually, or either card routine can be used to position 
the cards as follows: 


37 mmmmm mmmrnm 
20 00000 00000 
37 mmmmm mmnmrn 
20 00000 00000 


( to card routine ) 
( pick punch card ) 
( to card routine ) 
( pick punch card ) 


Reading takes place at the second card station in the 
read channel-- one read card must be advanced before 
reading takes place. This also may be done manually, 
ox- may be done by either card routine: 


37 mmmmm mmmmm ( to card routine ) 
1C 00000 00000 ( pick read card ) 


The card Just advanced will not feed further unless 
another order to pick a card 13 given-- both pick and 
read orders must be given to read this card. 


It should be noted that once a card enters either the 
read or punch channel It continues to advance one card 
station each time the Bull Reproducer is cycled. 

Numbers are rounded to the desired number of decimal 
digits before punching take3 place*, A divide check 
error ston results if an insufficient number of card 
columns 1° allowed for the integer portion of a field. 

kJZ 
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In case of a card machine failure or an accidental atop 
In the middle of a card cycle, the current oard 'may be 
reread or punched again: reposition the oards, Bat 
PAK - 00000, and atart. 


A 3 
0 0 


0 2 
0 3 

1 0 


1 1 

1 2 

1 3 

2 0 

2 2 

2 3 


3 0 
3 1 
3 2 

C 3 3 

Note 1 


CARD ROUTINE OPERATIONS 
OPERATION 

Cycle Dull Reproducer. Cards already in either 
channel are advanced one card station. This 
operation also is performed with all of the 
following operations. 

Punch a card. 

Punch a card ( when uBed with the punch routine— 
do not use with the read routine). 

Pick a card from the read hopper. This card 
Is not in the read channel until the next 
card Is picked from the read hopper. 

Pick a oard from the read hopper and read a 
card. 

Pick a card from the read hopper and punoh a 
card. 

Pick a card from the read hopper and either 
read or punch a card. 3ee note below. 

Pick a card from the punch hopper. This oard 
Is not in the punch channel until the next 
card la picked from the punch hopper. 

Pick a card from the punch hopper end punch 
a card. 

Pick a card from the punch hopper and punoh a 
card ( when UBed with the punch routine-- do 
not use with the read routine). 

Pick a card from both hoppers. 

Pick a card from both hoppers and read a oard. 

Pick a card from both hoppers and punch a card. 

Pick a card from both hoppers and either read 

or punch a oard. See note below.- 

both routines can pick either or both read and 
punch cards. However, the read routine cannot 
be used to punch a card and the punch routine 
cannot be used to read a card. If both operatlo 

. "-f *•-r 
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CARD PACKAGE IC 001 
GENERATOR ROUTINE 


TRANSFER CARD PACKAGE 
TO ES. 

o —- (a) i la) 

MEMORY SUM -— (A) 

(R) —- (a) 

SUM OK ? 

1544 > m ? 

PRINT: "SET Ci" 

TT1 — (A) 

m = o ? 

STORE OO -1000 

M —(a) 

SR 15 (A^ 

02000 > M ■ 

40000 > M 7 
ST 0"RE M 
SL * ( 0) 

PUNCH ? 

READ ] 

SET 

FOR 

PUNCH 


7 2 000 


75 

30530 

00001 

72001 


11 

72002 

ooooo 

7 2 00 2 

ooooo 

4 5 

00350 

00001 

7 2 003 

C0001 

23 

10000 

20000 

72004 

0 0002 

75 

20530 

00004 

72 005 

0 0003 

*» ^ 

4. 

00000 

OOOOO 

72005 . 

0 0004 

1 1 

20000 

20000 

7 2 007 

0 000 5 

4 7 

00112 

00007 

7 2 0 1 0 

00006 

4 2 

00121 

00012 

7 2 C 11 

00007 

37 

00117 

00111 

7 2 012 

00010 

51 

00122 

20000 

72 013 

coon 

47 

0C006 

0011 1 

7 0 014 

0 001? 

3 6 

00346 

0 1000 

7 2 01 5 

0 00 13. 

5 1 

CC123 

2 0000 

7 2 C 16 

0 0014 

5 4 

20000. 

000 7 1 

7 2 017 

0 0015 

42 

OC127 

00017 

72 020 

0 0016 

4 2 

0C130 

0011 1 

7 2 0 21 

00017 

11 

20000 

01001 

7202 2 

C0C20 

44 

00021 

00021 

7 2 0 2 3 

00021 

44 

0002 3 

00022 

"’2024 

0CC22 

44 

C 0 0 2 7 

00111 

72025 

0 002 3' 

1 5 

ooooo 

0004 3 

7 2 0 2 5 

0 00 2 4 

15 

00026 

00054 

7 202 7 

0 0025 

1 5 

000 3 5 

0 012 0 

72030 

0 CO 2 6 

4 5 

CO 1 3 5 

000 32 

7 2 C 3 1 

00027 

1 5 

0007 2 

00043 

72032 

0 0 C 3 0 

1 5 

00100 

00054 

72032 

0 0031 

15 

OOOOO 

00120 

7 20 3 4 

0 00 3 2 

i i 

002 7 2 

0100 2 

72035 

00023 

7 5 

20200 

00041 

72036 

0 0034 

6 3 

47601 

00001 

7 2 03 7 

00035 

63 

00530 

10000 

72040 

00036 

' F C, 
.✓ — 

01001 

00006 

72041 

00037 

4 1 

01003 

00035 

72042 

00040 

63 

10000 

10000 

72043 

00041 

11 

00272 

01003 

72044 

00042 

41 

01002 

00036 


SET 

FOR 

READ 

SET INDEX 

PUNCH LEADER AND 7TH 
LEVEL HOLE ON BIOCTAL TAPE 
PUNCH 
INSERT 

address 

ON 

DIOCTAL 

TAPE 
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C' 

PA 

I 

'T 

I 



72045 

00043 

1 1 

30000 

10000 

72046 

00044 

51 

00124 

01002 

72047 

00045 

5 4 

01002 

00077 

72050 

00046 

11 

10000 

20000 

72051 

00047 

7? 

01002 

01000 

72052 

00050 

n *? 
j l 

CO 103 

00104 

72053 

00051 

21 

00043 

00143 

72054 

00052 

4 2 

00120 

00043 

72055 

00053 

11 

00141 

01003 

72056 

00054 

21 

30000 

00000 

72057 

00055 

37 

00103 

00104 

72060 

00056 

21 

00054 

00143 

72061 

00057 

41 

01003 

00C54 

72062 

0 CO 60 

31 

01001 

OQ.OOO 

72063 

00061 

1 1 

00127 

01002 

72064 

C CO 62 

42 

00127 

00067 

72065 

00063 

42 

00130 

00066 

72066 

00064 

11 

00130 

01002 

7 2 0 6 7 

00065 

42 

00143 

00067 

72070 

00066 

36 

01002 

01001 

72071 

00067 

1 1 

CO 2 7 2 

01002 

7 2 072 

C 0070 

1 1 

00135 

0 1003 

72072 

00071 

c r 
.y 

01001 

00006 

7 2 0 7 4 

C 00 72 

6,3 

00146 

10000 

72075 

C 00 7 3 

41 

01002 

00071 

72076 

0CC74 

5 5 

01001 

00006 

72077 

00075 

63 

IOCOO 

10000 

72100 

0 0076 

4 1 

01003 

000 71 

7 2101 

C0C77 

75 

00 2 00 

00C07 

72102 

00100 

63 

00131 

00001 

72103 

00101 

63 

1^000 

10000 

72104 

00102 

21 

01001 

00135 

72105 

00103 

45 

00000 

30000 

72106 

00104 

55 

20000 

00000 

72107 

00105 

55 

10000 

00006 

72110 

00106 

43 

10000 

00101 

72111 

'00107 

63 

00000 

10000 

72112 

00110 

45 

00000 

00105 


COMMAND TO BE MOD IFI ED — (Q) 
EXTRACT MULTIPLIER 

SR 9 

COMMAND —p- (A) 

ADD MODIFICATION 
PUNCH MODIFIED COMMAND ON TAPE 
STEP COMMAND PICKUP 
MODIFICATION FINISHED ? 

SET INDEX 
PICK UP CONSTANT 
PUNCH CONSTANT ON TAPE 
STEP CONSTANT PICKUP 
FINISHED ? 

CHECK ADDRESS —p* (a'I 
C2000 —— S 

02000 > CHECK ADDRESS * 

40000 > CHECK ADDRESS ? 

liOOOO —► S 

100000 > CHECK ADDRESS ? 

CHECK ADDRESS -S -v- CHECK ADDRESS 


PUNCH 

CHECK 

ADDRESS 

ON 

DIOCTAL 

TAPE 

PUNCH TRAILER# RETURN 
TO BEGINNING. 

'TAPE 


PUNCH 


ROUT I ME- 





ro°M n.* 







i 
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GENERATOR ROUTINE 


72113 

00111 

11 

00126 

00125 


72114 

00112 

54 

00125 

00044 


72115 

00113 

4 3 

20000 

00117 

PRINT 

72116 

0 C 114 

54 

20000 

00006 

ROUTINE 

72117 

00115 

61 

00000 

20000 


72120 

00 116 

45 

000 00 

00113 


72121 

0 0117 

5 6 

00000 

72000 


72122 

0 01 20 

11 

30000 

10000 

COMPARAND 

72123 

00121 

00 

00000 

01544 

CS LIMIT 

72124 

00122 

00 

00000 

77777 

EXTRACTOR 

72125 

00123 

00 

77777 

00000 

EXTRACTOR 

72126 

00124 

00 

01000 

01000 

EXTRACTOR 

72127 

00125 

4 5 

47243 

40757 

" SUM " 

72130 

00126 

4 5 

24200 

10425 

" SET a " 

72131 

00127 

00 

00000 

02000 

ES LIMIT 

72132 

0 013 0 

00 

COOOO 

4 0 C 0 0 

DRUM LIMIT 

72133 

00131 

00 

00000 

00011 

THESE 

72134 

00132 

00 

00001 

00001 

FlRSf 

72135 

00133 

00 

00000 

00017 

ELEVEN 

72136 

00134 

00 

00000 

00044 

CONSTANTS 

72137 

00135 

00 

00000 

00001 

ARE 

72140 

00136 

00 

COOOO 

00003 

USED 

72141 

C 013 7 

00 

00000 

00005 

BY 

72142 

00140 

00 

00000 

00010 

THE 

72143 

00141 

00 

00000 

00012 

CARD 

72144 

00142 

00 

00000 

00077 

READ 

72145 

00143 

00 

00001 

00000 

ROUTINE 

72146 

00144 

00 

00000 

00014 


72147 

00145 

40 

00000 

00000 



paok: 1C (X'1-LN 
pop r Mr- ZV-I > 
mo of l ATI 

DAII l ." 1 


THESE 
N INE 

CONSTANTS 

ARE 

USED 

3 Y 

THE 

PUNCH 

ROUTINE 
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72150 

00146 

01000 

71 

01206 

30000 

CONTROL WORD — (A) 

72151 

00147 

01001 

15 

20000 

01045 

PRESET PARAMETER 

72152 

00150 

01002 

15 

20000 

01106 

PI .KUP COMMANDS 

72153 

00151 

01003 

16 

20000 

01075 

PRESET DATA 

72154 

00152 

01004 

16 

20000 

01126 

STORAGE COMMANDS 

72155 

00153 

01005 

55 

20000 

00017 

PRESET DATA 

72156 

00154 

01006 

. 15 

10000 

01126 

PICKUP COMMAND 

72157 

00155 

01007 

75 

20011 

01011 

CLEAR 

72160 

00156 

01010 

23 

0122,3 

20000 

MATRIX 

72161 

00157 

01011 

16 

01200 

00000 

SET (00000) FOR RERUN 

72162 

00160 

01012 

55 

10000 

00030 


72163 

00161 

01013 

31 

01211 

00001 

BASIC BULL CODE —- (A') 

72164 

00162 

01014 

52 

01207 

20000 

ADD PICK CODES» IF PRESENT 

72165 

00163 

01015 . 

54 

20000 

00002 

SL Z (A) 

72166 

00164 

01016 

55 

10000 

00002 

SL l (Q) 

72167 

00165 

01017 

44 

01024 

01020 

READ ? 

72170 

00166 

01020 

17 

0000 0 

20000 

START CARD CYCLE 

72171 

00167 

01021 

21 

01000 

01206 

SET 

72172 

00170 

01022 

16 

20000 

01023 

EXIT 

72173 

00171 

01023 

45 

00000 

30000 

EXIT OF READ ROUTINE 

72174 

00172 

01024 

35 

01206 

20000 

ADD READ CODE 

72175 

00173 

01025 

17 

00000 

20000 

START CARD CYCLE 

72176 

C 0 174 

01026 

11 

01202 

01124 

9 —DIGIT 

72177 

00175 

01027 

37 

01174 

01171 

READ CARD ROW 

72200 

00176 

01030 

47 

01031 

01041 

BEGIN CONVERSION WHEN DIGIT = 

72201 

00177 

01031 

11 

01176 

01143 

PRESET MATRIX STORE 

72202 

00200 

01032 

55 

01220 

00000 

ROW WORD 1 —»- (q) 

72203 

00201 

01033 

37 

01146 

01135 

4 TIMES THRU MATRIX LOOP 

72204 

00202 

01034 

55 

01221 

00000 

ROW WORD 2 —— (Q) 

72205 

00203 

01035 

37 

01146. 

01135 

4 TIMES THRU MATRIX LOOP 

72206 

00204 

01036 

55 

01222 

00034 

ROW WORD 3 —— (Q) 

72207 

00205 

01037 

37 

01146 

01136 

ONCE THRU MATRIX LOOP 

72210 

00206 

01040 

41 

01124 

01027 

DIGIT -1 —DIGIT# REPEAT 

72211 

00207 

01041 

11 

01202 

01145 

PRESET MATRIX INDEX 

72212 

00210 

01042 

15 

01010 

01152 

PRESET MATRIX TRANSFER 

72213 

00211 

01043 

16 

01027 

01103 

SET SIGN READ SWITCH 

72214 

00212 

01044 

37 

01100 

01045 

SET 06, 


4- f 
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READ ROUTINE 


page- IC 001-16 
report no 

MODEL All 
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/ ^ 21 5 

00213 

01045 

5 5 

30000 

00000 

PARAMETER WORD — — (L) 

■^2216 

00214 

01046 

4 4 

01101 

01047 

LAST FIELD ? 

■72217 

00215 

01047 

5 5 

10000 

00013 

SL ,, (Cl) 

72220 

00216 

01050 

51 

01213 

20000 

S —A- A 

722 71 

0 C 2 1 7 

010 51 

16 

20000 

01073 

SET SHIFT 

*> *> " 

/ C L. *. * 

0 0 2 7 0 

01052 

55 

10000 

00006 

SL (0) 

7222 1 

0 0 2 21 

01053 

51 

01213 

01216 

STORE B 

7 2 2 2 4 

00222 

01054 

5 6 

10000 

00006 

SL u to) 

t *> n c; 

0 022 3 

0105 5 

51 

01213 

01217 

STORE L 

7 2 2 7 6 

00224 

01056 

55 

10000 

00006. 

SLc (Q) 

' -» '» *Jf 

00225 

01057 

51 

01213 

01215 

STORE R 

7 22 10 

00226 

01060 

37 

01155 

01061 

SHIFT MATRIX 

722 3 1 

00227 

01061 

41 

01216 

01147 

B DECIMAL DIGITS 

72232 

00230 

01062 

37 

01170 

01063 

L TERMS OF SERIES 

72233 

00231 

01063 

41 

01217 

01164 

CONVERSION —— N 

72234 

00232 

01064 

11 

01206 

01217 

1 — 10 * 

72235 

00233 

01065 

16 

01201 

01155 

IF R > 0* SHIFT OUT 

72236 

00234 

01066 

41 

01215 

01147 

DECIMAL POINT* R-l —- R 

72237 

00235 

01067 

37 

01170 

01070 

COMPUTE 10*, R TERMS OF 

72240 

00236 

01070 

41 

01215 

01162 

SERIES ADDED TO N 

72241 

00237 

01071 

37 

01155 

01147 

SHIFT OUT SIGN POSITION 

72242 

00240 

01072 

54 

01217 

10107 

10 B * 2 —— (0) 

72243 

00241 

01073 

31 

01216 

30000 

N • 2 S — (A) 

72244 

00242 

01074 

32 

10000 

00000 

N • 2 S 4- 10*. 2 ”' (a) 

72245 

00243 

01075 

73 

01217 

30000 

N • 2 S /10* ROUNDED — (o') 

72246 

00244 

01076 

21 

01045 

01214 

STEP PARAMETER 

72247 

00245 

01077 

21 

01075 

01206 

STEP D 

72250 

00246 

01100 

45 

00000 

30000 

0( SWITCH 

72251 

00247 

01101 

37 

01100 

01047 

SET <*z 

72252 

00250 

01102 

23 

01216 

20000 

SET SHIFT COUNT = 0 

72253 

00251 

01103 

37 

01174 

30000 

SIGN READ SWITCH 

72254 

00252 

01104 

55 

01222 

00034 

SL 28 SIGN WORD 3 

72255 

00253 

01105 

37 

01131 

01106 

SET /3, 

72256 

00254 

01106 

55 

30000 

00000 

PARAMETER WORD —*- (Q) 

72257 

00255 

01107 

44 

01132 

OHIO 

LAST FIELD ? 

72260 

00256 

OHIO 

55 

10000 

00021 

SL\7 (Q) 

72261 

00257 

01111 

31 

01216 

00000 

SHIFT COUNT-- (a) 

72262 

00260 

01112 

52 

01213 

01216 

SC7- B A 4-54 
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READ ROUTINE 


our- 

5 5 

10000 

00006 

0 11 1 4 

r, 

^ /- 

01213 

01 216 

Oil l r 

5 5 

10000 

00006 

o.lll 6 

5? 

01213 

01216 

0 1 ’ ] 7 

73 

01205 

1 0 0 0 0 

01120 

5 5 

10000 

00 C 17 

01121 

3 5 

10000 

20000 

0112 2 

3 5 

0] 175 

01124 

01 1 ?’ 

21 

01216 

Cl 206 

0 11 2 -• 

(po 

00000 

0000 2) 

0 1 1 7 r 

4 6 

011 2 6 

01127 

0 1126 

13 

30000 

30000 

01127 

- 

4 i 

01106 

01214 

01130 

? 1 

0112 6 

01203 

0 1131 

4 5 

^nooo 

3^000 

0 11 3 2 

37 

G11 ? 1 

0 111 0 

0 11 3 2 

3 7 

0117 4 

01171 

Cl 134 

45 

00000 

01021 

0113* 

11 

01207 

01216 

01136 

11 

012 06 

01217 

0113 7 

54 

01217 

00004 

01140 

44 

01141 

01142 


pageIC 001-17 

REPORT NO Z¥ U 91 
MODEL All 
DATE 1/12/55 ' 1 

f,L 6 (q) Pot. 2/22/55) 

SC -F B +• L —— f A ) 

SL fc (a) 

SC + 13 + L -4- R -— SC 

5C/36-*- (q) REM —— ( r) 

SL is ( 0) 

(o') • 2 15 -+- REM -*-( A') 

SET SHIFT COMMAND 

SC 1 -— SHI FT COUNT 

SHIFT SIGN BIT -— A 7l 

A 7 , = 1 ? 

-fD ) ——'( D ) 

STEP PARAMETER 
STEP D 
fi S W ITCH 
SET ^2 
READ ROW 1? 

EXIT 

SET INDEX = 3 
1 —*- M 
SL 4 X 
035 = 1 


72311 

00307 

0114 1 

35 

Cl 124 

01217 

DIGIT +- M -*- M 

72312 

0 0 310 

01142 

4 3 

20000 

01137 

FULL "ATRIX word in (r) ? 

72 313 

0 0 311 

0114'- 

Q 7 

2 312 0 

75 2 25] 

MATRIX + M -*— MATRIX 

72314 

C 0 3 1 2 

01144 

y i 

A- A 

0114 3 

01214 

STEP STORE COMMAND 

7 2315 

0 0 313 

0114 5 

41 

01216 

01136 

FINISHED MATRIX LOOP ? 

7 2 316 

00314 

01146 

4 5 

00000 

30000 

EXIT MATRIX LOOP 

72317 

0 0 3 15 

0114 7 

41 

0 114 3 

01154 

USED UP MATRIX INDEX ? 

72320 

0 0 316 

01150 

11 

01211 

01142 

RESET INDEX 

72321 

0 0 31 7 

0115 1 

21 

01152 

01214 

STEP MATRIX TRANSFER 

72322 

0 03 2 0 

0115 2 

11 

30000 

01223 

TRANSFER MATRIX WORD 

72323 

0 0 3 21. 

01153 

43 

01177 

01156 

TIME TO READ SIGN ROW? 

72324 

00322 

01164 

55 

01223 

00004 

SL 4. MATRIX WORD 

72325 

0 G 3 2 3 

0115 5 

4 5 

00000 

30000 

EXIT OF SHIFT ROUTINE 


READ SIGN ROW 

SL z2 SIGN WORD 3 

.SET SIGN READ SWITCH TO SKIP 


72326 00324 01156 37 01174 01171 

72327 00325 01157 55 01222 00034 

72330 00326 01160 37 01103 01154 
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PI 71900-4-37 


KO*>M NO [T I (JVT 


CONSOLIDATED VULTEE AIRCRAFT CORPORATION 

• AN DIEGO DIVISION 

CV-37 

READ ROUTINE 


page rc 001-18 

REPORT NO Z]i.~h r j\ 
MODEL All 
date 1/12/55 


72331 

00327 

01161 

45 

00000 

Cl 105 

10 • 10* 

72332 

00330 

01162 

71 

01212 

01217 

72333 

00331 

01163 

11 

20000 

01217 

—— 10*- 

72334 

00332 

01164 

37 

01155 

01147 

SHIFT MATRIX 1 D 

72335 

00333 

01165 

31 

01216 

00002 

4N —(A) 

72336 

00334 

01166 

32 

01216 

00001 

2 ( 4N +• N ) —— (A 

72337 

00335 

01167 

32 

01204 

01216 

10N + DIGIT - 

72340 

00336 

01170 

45 

00000 

30000 

EXIT OF SERIES R 

72341 

00337 

01171 

76 

00000 

01222 

READ ONE 

72342 

00340 

01172 

76 

10000 

01220 

ROW FROM 

72343 

00341 

01173 

76 

10000 

01221 

PUNCHED CARD 

72344 

00342 

01174 

45 

00000 

30000 

ROW READ EXIT 

72345 

00343 

01175 

31 

01220 

00044 

PRESET 

72346 

00344 

01176 

21 

01223 

01217 

PRESET 

f 

72347 

00345 

01177 

11 

01230 

01223 

COMPARAND 

72350 

00346 

01200 

00 

00000 

01000 

CONSTANT 

72351 

00347 

01201 

00 

00000 

01067 

CONSTANT 



1202 

00 

00000 

00011 

^9 DECIMAL 



1203 

00 

00001 

00001 

U AND V ADVANCE 



1204 

00 

00000 

00017 

4 BIT EXTRACTOR 



1205 

00 

00000 

00044 

36 DECIMAL 



1206 

00 

00000 

00001 

1 



1207 

00 

00000 

00003 

3 



1210 

00 

00000 

00005 

5 



1211 

00 

00000 

00010 

8 



1212 

00 

00000 

00012 

10 



1213 

00 

00000 

00077 

TWO OCTAL DIGIT 



1214 

00 

00001 

00000 

U ADVANCE 


1215 

1216 
1217 
1220 
1221 
1222 
1223 
122 * 

1225 

1226 


B» N» SC» INDEX 
L» M# 10 
ROW WORD 1 
ROW WORD 2 
ROW WORD 3 
MATRIX WORD 1 
MATRIX WORD 2 
MATRIX WORD 3 
MATRI WORD 4 
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PX 719CC-4-37 


ro«M mo 





r r 




CONSOLIDATED VULTEI AIRCRAFT CORPORATION 
SAN OICOO DIVISION 

CV-3 7 

R F AD ROUTINE 


1227 

MATRIX 

WORD 

5 

1230 

MATR I X 

WORD 

6 

1231 

MATRIX 

WORD 

7 

1232 

MATRIX 

WORD 

6 

1233 

MATRIX 

WOOD 

9 


f’AGE rc 00)-19 
REPORT NO 
MODEL Xll 
DATE I/12/55 
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Fa 719C0-4-37 


roBM NO r T I r 


CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 






CV-37 

CARD PACKAGE IC 001 
PUNCH ROUT IME 


72352 

0 03 50 

01000 

71 

011 6 C 

30000 

72363 

0 0 3 51 

01001 

16 

20000 

01C26 

72 3 54 

0 0 3 5 2 

01002 

55 

20000 

00 01 7 

7 2 3 55 

0 0 3 5? 

0100 ? 

16 

10000 

01060 

7 2 3 5 5 

0 C 3 5 4 

01004 

7 5 

20044 

oi or. 6 

7 2 3 5 7 

0 C 3 5 c ' 

01005 

2 3 

0117 1 

20000 

7 •} 7 A 

1 L. - V* 

00 3 56 

01006 

16 

0115 6 

000 00 

7 2 2 61 

0 0 3 57 

01007 

31 

0116 3 

COCCI 

7 2 3 6 2 

00360 

01 C10 

55 

10000 

000 30 

7 2 3 6 3 

0 C 3 6 1 

01011 

52 

01161 

20000 

72364 

0036? 

0101 ? 

54 

20000 

O0C02 

72365 

0 0 363 

01013 

44 

C1014 

01014 

72366 

00364 

01014 

44 

01021 

C1C15 

72 367 

00365 

01015 

17 

00000 

2 0 0 C 0 

72370 

00366 

0 101 6 

21 

01000 

0116C 

72371 

00367* 

0 1017 

16 

20000 

01020 

72372 

00370 

01020 

4 5 

00000 

30000 

72373 

00371 

01021 

32 

0113 7 

00000 

72374 

00372 

01022 

17 

00000 

20 C00 

72375 

00373 

01023 

11 

01170 

OHIO 

72376 

C 0374 

01024 

11 

01154 

01111 

72 3 77 

00375 

01025 

37 

01020 

0 1C 26 

72400 

00376 

01026 

55 

20000 

00000 

72401 

00377 

01027 

44 

01101 

01030 

72402 

00400 

01030 

55 

10000 

00013 

72403 

00401 

01031 

51 

0116 5 

20000 

72404 

0 040 2 

010 32 

13 

20000 

20000 

72405 

00403 

C 10 3 3 

3 5 

0115 5 

01061 

724CG 

0 0404 

01034 

55 

100 00 

00006 

72407 

00405 

010 3 5 

51 

01165 

0113 2 

7 2 410 

00406 

01036 

55 

10000 

00006 

72411 

00407 

01037 

51 

01165 

01125 

72412 

004 10 

01040 

55 

10000 

00006 

72413 

00411 

01041 

51 

01165 

01153 

72414 

00412 

01042 

44 

01115 

01043 

72415 

00413 

01043 

16 

01127 

01143 


PAG £ IC 001 - 3 ? 
REPORT NO ZV-I,'/ 
MODEL All 
DATE 1 /l ?/55 

CONTROL WORD —— ( A) 

SET PARAMETER PICKUP 
SL (g CONTROL WORD 
SET DATA PICKUP 
CLEAR 
IMAGE 

SET (OOCCO) FOR RERUN 

basic bull code —«- ( fi ) 

SL z.4 CONTROL WORD 
EXTRACT PICK CODES 

SL T_ (A') 

SL | CONTROL WORD 
PUNCH 2 

NO ' START CARD CYCLE. 

SET 

EXIT 

EXIT, SWITCH 

YES , ADD PUNCH CODE . 

START CARD CYCLE 
PRESTORE COLUMN SELECTOR 
PRESTORE ROW SELECTOR 
SET 06, 

PARAMETER WORD —— (Q) 

LAST PARAMETER WORD ? 

SET 

UP 

SHIFT 

ORDER 

SL k, ( G ) 

STORE B 
SLu To'' 

STORE L 
5L (. (O') 

STORE R 

ZERO SUPPRESSION 2 

% 

SET FOR NO ZERO SUPPRESSION 
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CONSOLIDATED VULTEE AIRCRAFT CORPORATION 
SAN DIEGO DIVISION 


CV-37 

PUNCH ROUTINE 


72 A 16 

00414 

01044 

37 

01136 

01045 

72417 

00415 

01045 

41 

01132 

01133 

72420 

00416 

01046 

31 

01125 

00017 

72421 

00417 

01047 

37 

01146 

01144 

72422 

00420 

010 50 

11 

200 C0 

oi 112 

72423 

0 0421 

01051 

31 

0115 3 

00017 

72424 

00422 

01052 

37 

01146 

01 144 

72425 

00423 

010 5 3 

16 

01156 

00000 

72426 

0 04 24 

01054 

31 

0116 6 

00023 

72427 

0 042 5 

01055 

73 

10C00 

10000 

72430 

00426 

01056 

31 

01112 

00107 

72431 

00427 

01057 

35 

10000 

10000 

72432 

00430 

01060 

12 

30000 

01132 

72433 

00431 

01061 

00 

30000 

30000 

72434 

00432 

01062 

35 

10000 

20000 

72435 

00433 

01063 

73 

01112 

20000 

72436 

00434 

01064 

35 

20000 

01112 

72437 

00435 

01065 

37 

01136 

01066 

72440 

00436 

01066 

41 

01125 

01137 

72441 

00437 

01067 

16 

01157 

01136 

72442 

00440 

01070 

41 

01153 

01120 

72443 

0 0441 

01071 

41 

01153 

01137 

72444 

00442 

01072 

15 

01060 

01073 

72445 

00443 

01073 

55 

30000 

00000 

72446 

00444 

01074 

21 

01026 

01166 

72447 

00445 

01075 

21 

0106C 

01166 

72450 

00446 

01076 

16 

01020 

01136 

72451 

00447 

01077 

13 

01160 

20000 

72452 

00450 

01100 

44 

01130 

01133 

72453 

00451 

01101 

37 

01020 

01030 

72454 

00452 

01102 

75 

20014 

01104 

72455 

00453 

01103 

55 

01221 

00010 

72456 

00454 

01104 

75 

30003 

01106 

72457 

00455 

01105 

11 

01150 

01110 

72460 

00456 

01106 

16 

01156 

00000 

72461 

00457 

01107 

43 

01151 

01016 


page ic 001-21 

REPORT NO 2*4*91 
MODEL All 

date 1/12/55 

SHIFT COLUMN SELECTOR 
BB COLUMNS 
L • 2 ir -^ ('A) 

10 L —— (A) 

STORE 10*" 

R * 2 >Sr —— (A) 

OR 1 (Q'lIF R — 0 
RESET (00000) FOR RERUN 
2 34 -— (A) 

2 54 /10 RH —*- ROUNDING TERM 
10 L > 2 ~ 1 DIVIDE ROUND 

STORE ROUNDING TERMS 

STORE N • 2 S 
N * 2 5r —— (A) 

ADD ROUNDING TERMS 
N • 2 ir /lO U —*- (A) 

N • 2^*/10 l —•- N 1 
L TIMES THRU 

CONVERSION LOOP 
SET EXIT IN IMAGE .ROUTINE 
STORE DECIMAL POINT IF R > 0 

R -1 TIMES THRU CONVERSION 
SET NEXT INSTRUCTION 
N • 2 5 —— (Q) 

STEP PARAMETER 
STEP D 
SET EXIT 
-1 —— (A\ 

N NEGATIVE f 
*ET 0 t 2 

-SHIFT i-8 RIGHT THIRD OP 
CARD IMAGE 
SET UP 

PUNCH ORDERS 
RESET (OOOOO) FOR RERUN 
ALL 12 ROWS PUNCHED ? 


f< 
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FX 719C0-4-37 


POB M NO IT .1 ©P 



CONSOLIDATED VULTEC AIRCRAFT CORPORATION 

■ AN OIEOO DIVISION 

CV-37 

PUNCH ROUTINE 


PAOE IC 00!-22 

REPORT NO ZM-U9-1 
MODFL All 
DATE 1/12/55 


72462 

00460 

OHIO 

00 

30000 

30000 

PUNCH 

72463 

00461 

01111 

00 

30000 

30000 

ONE 

72464 

00462 

01112 

00 

30000 

30000 

ROW 

72465 

00463 

01113 

75 

20003 

01106 

STEP 

72466 

00464 

01114 

23 

OHIO 

01160 

PUNCH ORDERS 

72467 

00465 

01115 

37 

01143 

01044 

SET FOR ZERO SUPPRESSION 

72470 

00466 

01116 

43 

01123 

01127 

IF L « Oi NO ZERO SUPPRESSION 

72471 

00467 

01117 

45 

00000' 

01133 


72472 

00470 

01120 

31 

01161 

00000 

3 (A) 

72473 

00471 

01121 

35 

01111 

01124 

SELECT ROW 3 

72474 

00472 

O 

NJ 

rj 

35 

01162 

01123 

SELECT ROW 8 

72475 

00473 

01123 

55 

OHIO 

00000 

COLUMN SELECTOR —— (q) 

72476 

00474 

01124 

00 

30000 

30000 

EXTRACT 3 

72477 

00475 

01125 

00 

30000 

30000 

EXTRACT 0 

725C0 

00476 

01126 

33 

01160 

00001 

SELECT ROW 12 

72501 

00477 

01127 

37 

01143 

01130 

SET NO ZERO SUPPRESSION 

72502 

00500 

01130 

35 

01111 

01132 

ADD ROW SELECTOR TO (a) 

72503 

00501 

01131 

55 

OHIO 

00000 

COLUMN SELECTOR —— ( 0 ) 

72504 

00502 

01132 

00 

30000 

30000 

EXTRACT DIGIT 

72505 

00503 

01133 

55 

OHIO 

00043 

SR , COLUMN SELECTOR 

72506 

00504 

01134 

44 

01135 

01136 

1/3 IMAGE FILLED ? 

72507 

00505 

01135 

21 

01111 

01167 

YES» STEP ROW SELECTOR 

72510 

00506 

01136 

45 

00000 

30000 

EXIT OF IMAGE ROUTINE 

72511 

00507 

01137 

31 

01112 

00002 

4 N ' —— (A) 

72512 

00510 

01140 

32 

01112 

00001 

ion' —*- (a) 

72513 

00511 

01141 

11 

20000 

01112 

FRACTIONAL PART —N ' 

72514 

00512 

01142 

34 

20000 

00044 

INTEGER PART — (R) 

72515 

00513 

01143 

47 

01127 

30000 

THIS DIGIT == 0 ? 

72516 

00514 

01144 

15 

20000 

01146 

SET REPEAT ORDER 

72517 

00515 

01145 

54 

01160 

10000 

1 —(A), (Q) 

72520 

00516 

01146 

75 

30000 

30000 

FORM 10 * IN (A) 

72521 

00517 

0114 7 

71 

20000 

01164 

AND 10* _I IN (Q) 

72522 

00520 

01150 

77 

00000 

01234 

PRESET 

72523 

00521 

01151 

77 

10000 

01204 

PRESET 

72524 

00522 

01152 

77 

10000 

01220 

PRESET 

72525 

00523 

01153 

00 

30000 

30000 


72526 

00524 

01154 

53 

10000 

01173 

PRESET 

72527 

00525 

01155 

31 

01132 

0C043 

PRESET 





719CC-4-37 


ro»M mo f t 


CONSOLIDATED VULTtE AIRCRAFT CORPORATION 

SAN DIEGO DIVISION 


i r r 


L'V-37 

PUNCH POUT I NT 


p ‘OE ic 001-2; 

REPORT NO 2K-<4 
MODEL All 

DATE 1/12/55 





72 5 3 0 

72 c '?l 


0 0 5 26 

01156 

00 

orooo 

01000 

00627 

01 1 >'7 

OC 

00000 

01071 


1160 

00 

00000 

00001 


1161 

00 

00000 

00003 


1162 

00 

00000 

00005 


116 3 

00 

00000 

OCOIO 


1164 

00 

o.ooro 

0001? 


1166 

00 

c*oooo 

"0077 


1166 

00 

00001 

00 000 


1167 

00 

00000 

000 14 


1170 

40 

00000 

00000 


1171 

1172 

1173 

1174 

1175 
1175 
1177 
1200 
1201 
1202 

1203 

1204 

1205 

1206 
1207 
1210 
1211 
1212 
1213 
12 14 
12 15 
1216 
1217 
1220 


1 

3 

5 

8 

10 

TWO OCTAL DIGIT EXTRACTOR 

U ADVANCE 

12 

PRESET FOR COLUMN SELECTOR 

CARD IMAGE COLS 1-36 ROW 12 

ROW 11 
ROW 0 
ROW 1 
ROW 2 
ROW 3 
ROW 4 
ROW 5 
ROW 6 
ROW 7 
ROW 8 
ROW 9 

CARD IMAGE COLS 37-72 ROW II 

ROW l: 
ROW 0 
ROW 1 
ROW 2 
ROW 3 
ROW 4 
ROW £ 
ROW 6 
ROW * 
ROW f 
ROW 1 
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CONSOLIDATED VULTEE AIRCRAf T CORPORATION 
SAN DlfCO DIVISION 


no ri t 


CV-37 

PUNCH ROUTINE 


page, ic coi-a. 
REPORT TJO ZJ.-L l'}i 

MODEL All 
DATE l/;2/55 


1221 

CARD IMAGE COLS 7?.-30 ROW 

12 

1222 

ROW 

11 

1223 

ROW 

0 

- 12 2-4 

ROW 

1 

1 2 ? r > 

ROW 

2 

1326 

ROW 

3 

1227 

r.ow 

4 

1230 

ROW 

5 

1231 

* ROW 

6 

12 32 

ROW 

7 

1233 

ROW 

8 

12 34 

ROW 

9 
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USEful Sot* #5 

SUBJECTS Double Precision Add, Multiply (RR) 

HEADING 

In order to complete the following routines as library subroutines in 
the USE format, the following heading should precede each routine. This 
heading will add 0.04 MS to each subroutine. 


12 December 1956 











double: precision add (method i) 


Want b + c = d b = b^ 4 b 2 ditto c and d 
Assume each word contains 35 bits preceded by a sign bit in one's com¬ 
pliment form. 


Loc 

op 

u 

V 

Remarks 

start 

TP 

b l 

A 

*> 

) 


AT 

C. 

A 

( 




1 


\ 

1 add 


LA 

A 

35 


} (0.24 MS) 


AT 

b 2 

A 




AT 

c 2 

A 

J 


unpack 

LT1 

0 

d 2 

> 



LT 

1 

d l 


f 

i unpack 


TP 

mask 

Q 


J (0.17 MS) 


QS 

*1 

*2 



l 

MJ 

0 

exit 



mask 

40 

0 

0 




Total time = 0.41 MS 

This routine ignores the fact that overflow may occur into 

bit 71 of the accumulator. 





DOUBLE PRECISION ADD (METHOD 2) 


Want b + c = d b = bj, + b 2 ditto c and d (one's compliment form) 
All words with subscript 2 contain 36 data bits and all words with sub¬ 
script 1 contain 35 data bits preceded by a sign bit. Note: all numbers 
(b, c, and d) are in l’s compliment form. 



Total time = 0.28 MS 

This routine ignores the fact that overflow may occur into bit ?2 of 
the accumulator. To test for overflow is not difficult nor lengthy but is 
omitted here. If the operations of multiply or divide are to be used also, 
this method of packing numbers for addition complicates these routines unduly 
and is not significantly faster for addition than method JL, 





- 4 - 


DOUBLE PRECISION MULTIPLY (METHOD l) 

Want b • c = d d = bi • ci + bi » 03 + bg • + b 2 • Cj 

Assume 35 bits and a sign bit in words with subscript 2 and 34 bits and 
two sign bits in words with subscript of 1 in one's compliment form. (Note: 
no change in method 1 add is necessary with these restrictions.) 


Loc 

op 

u 

V 

start 

MP 

b 2 

c 2 


LT 

1 

temp 


MP 

Q 

C 1 


MA 

b l 

c 2 


AT 

temp 

A 


SJ 

neg 

pos 

neg 

SS 

round 

0 


MJ 

0 

pos + 

pos 

SA 

round 

0 


LT 

1 

temp 


MP 

Q 

cl 


AT 

temp 

A 

unpack 

LT1 

0 

d 2 


LT 

1 

d l 


TP 

round 

Q 


QS 

d l 

d 2 


MJ 

- 

exit 

round 

40 

0 

0 



Remarks 


hound 


mult. 


round 


mult. 


unpack 


Max. error +1/2 in the last place kept 
average time of round = 0.39 MS 








0.95 MS 


average time of multiply = 
average time of unpack = 0.17 MS 

average total time = 1.52 MS 

(Times, assume 0.27 MS for MP) 

Notei this routine assumes only 69 places as input and output* (in 

general overflow occurs if more bits are assumed)* 





DOUBLE PRECISION MULTIPLY (METHOD 2) 


Want bj* c = d 

(See method 1 of multiply for scaling on b, c, and d) 
d = b^ • + b^ • 02 + b2 + Cj_ 


Loc 

op 

start 

MP 


MA 


LT 


MP 


AT 


unpack 


u 

V 

Remarks 

bi 

01 \ 
°2 J 

Form (t>2 8 C^) + (b^ ® ©2) 

i 1 

temp 

scale down 

Q 

01 

Form d 

temp 

A J 



"|see 

method 1 for unpacking 


(routine 


Average time = (Ct88 MS (assumes 0.27 MS for MP) 
Average total time = 1*05 MS (including unpacking) 
Max. error + 1 in the last place kept 


The main difference in these two methods of multiply is in the 
accuracy obtained. It should be noted that the maximum difference in the 
error between the two methods is only one place. 

Further note that no overflow can occur as the result of pnpacklngL(as in 
the add routines)in these two multiply routines. 








USEful Note #6 

Subjects Preliminary Information- General Tape Handler 


vn _ 

11 December 195t> 

(HR) 


PRELIMINARY INFORMATION—GENERAL TAPE HANDLER 


The General Tape Handler is a routine to.facilitate the uae of the 11G3A 
magnetic tape system. The routine provides built in checks which prevent the 
initiation of erroneous tape operations, and an error entry which makes use 
of information on the 'last' tape operation initiated correctly, to recover 
from faults occurring while tape is in operation. A parity check is made 
for each block read, and blocks in which errors occur are automatically re¬ 
read at different bias levels. 


initiation of tape operation 


The tape handler is in the USE subroutine form with one parameter word 
which specifies the type of operation, etc. The parameter word is placed in 
location GTH+3, and routine is entered with a return jump. 


Foan of parameter 


word 


R M T NN SS WWV 


R - octal digit which specifies operation 

1 rewind 

2 rewind/interlock 

3 move forward 

4 move backward 

5 read forward 

6 r^ad backward 

7 write 

M - blockette spacing (for,write only ) 

M = 1 - 0" blockette spacing 

= 2 - 0.1" blockette spacing 
= 4 - 1.0" blockette spacing 

T - block spacing and density ( for write only ) 

T = 0 1" block space 128 lines/in. density 

=1 1" block space 50 lines/in. density 

- 2 2.4" block space 12b lines/in. density 

= 3 2.4" block space 50 lines/in. density 

NN - number of blocks to be written ( write only ) 

MTNN - number of blocks to be moved or read 

SS - number of servo on which operation is to be performed 

WWV - High Speed Storage address for read and write 







1) For write first word is taken from location specified by VWW. 
Succeeding words are taken from ascending storage locations. 

2) For read forward first word is read into location specified 
by VWVV and succeeding words are read into ascending storage 
locations. 

3) For read backward first word is read into location VVVVV + 
I20n-1 . (where n is number of blocks to be read) Succeeding 
words are read into descending storage locations, and the last 
word to be read is placed in WWV, 


Sentinel blocks 

The routine recognizes two types of sentinel blocks; lead and final. 

A complete block of all £ words is recognized as a final sentinel. A block 
whose first and last blockettes are allZ-'s is recognized as a lead sentinel. 
The other four blockettes may also contain all * words, but at least one word 
must be a non - tword. 

Errors detected by the routine 

Upon detection cf many errors, a code word is placed in a diagnostic 
routine (not a part of this routine), followed by a return jump to the diag¬ 
nostic routine. 

Errors which are treated this way are: 

(1) No operation specified (R = 0) 

(2) No blockette space designation 

(3) Read which would clobber the routine if executed 

( 4 ) Read which would clobber Fp to F^, or would try to read words 
into locations outside of high speed storage 

(5) Write, which takes words from locations outside of H.S.S. 

If a parity error occurs, and attempts to reread the block at different 
bias levels are unsuccessful, the routine prints out p rf for read forward, 
or p rb for read backward and stops with PAK set to re-enter the reread 
routine. 

If a final sentinel block is reached on a read or move forward n blocks 
before the nth block is read, tape is stopped, repositioned to first word of 
the sentinel block. The routine prints out s rf or s mf and stops with PAK 
set to exit from the routine. If the sentinel block is the nth block to be 
read, tape is repositioned to first word of block, but no print out is made 
and computer is not stopped. 

If a lead sentinel is reached on a read or move backward n blocks be¬ 
fore the nth block is read, tape is stopped, s rb or s mb is girinted and 
computer stops with PAK set to exit from routine. Tape is net r epositioned 
to last word of sentinel block, since the lead sentinel may contain informa¬ 
tion necessary to identify tape on next read forward. 
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If the lead sentinel block is the nth block tape is stopped but computer 
is not stopped. 

Error entry 

Most faults occuring while the tapes are in operation are recoverable 
by re-entering the routine from the error entry. 

The one error which may not be recoverable is a > 720 error in the last 
block to be read or moved. In this case computer coasts for ->-80 m.s. be¬ 
fore the fault stop. If < 6 extra lines are detected, a second tape opera¬ 
tion cannot be initiated during this 80 m.s. coasting time since the instruc¬ 
tion which would normally stop the tape has hung up in TCR without giving an 
IOB resume. If program is not altered during this coasting time, and other 
tape operations have not been started, recovery can be made by re-entering 
at error entry. 

Indications of >720 error in last block 

MT B fault indicator illuminated. Sproket Error indicator in tape con¬ 
trol cabinet illuminated. PCR contains something other than an ER. (If PCR 
contains an ER, the error was either a 4.720 fault or a >720 fault in some 
block other than the last block to be read.) If less than six extra lines 
were detected TCR contains stop bits (6000). If more than six extra lines 
were detected the contents of TCR cannot be predicted, and another tape 
operation may have been initiated and a second fault may have been generated 
when the computer stopped. 


NOTE* Copies of the GTH flow-charts are available upon request 
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USEful Note,(Mil) Number 7 


The following write-up contains a description of three non-standard 1103A 
routines to be used as preliminary acceptance tests. 

1. NAME? ML TP1 Acceptance Test, Tape 

Systems Development Group - 1 October 1956 
Lockheed Missile Systems Division 

METHOD* One hundred and twenty pseudo-random numbers are generated 

and stored in core. These numbers are then written onto tape, 
read back, and shifted drculary in sequence. The process is 
repeated 120 times and the resulting block is compared with 
an undisturbed image of the original block. 

OPERATIONt 1. Set PAK to 00001. 

2. Set low order of Q-register with Uniservo number if test 
is to be run using only one Uniservo. 

3. Set M.J. switches. 



li. Set MS switches. 



Depress Start 

The following indications will appear on the typewriters 


OUTPUT* HUZZAH 

- 

Test Successful 

BADTPE 

- 

Program fails on any bias. 

TAPE n NORMAL 

- 

Bias failure 

TAPE n HIGH 

■m 

Bias failure 


TAPE n LOW 


Bias failure 
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STOPS: (PAK) ■ OOOOl Intermediate or final stop, depressing start button 

continues test with rewinding of UniservoSo 

0 

(PAK) ■ 00003 Intermediate or final stop, depressing start button 
continues test with no rewinding of Uniservos. 

TIMING i Approximately three minutes for one test. 


2. NAME: ML MD1, Magnetic Drum 

Systems Development Group, 1 October 1956 
Missile Systems Division 

METHOD: Four thousand and ninety-six pseudo-random numbers are generated 

in two stops and stored as working storage on a logical drum. 

The same numbers are stored as a mirror image on another logical 
drum. The working storage is then rotated between drum and core 
ii.,096 times with an offset of one. The final rotation is then 
compared against the mirror image. The program tests sequentially 
drum 5 working - drum 7 mirror, drum 6 working - drum 7 mirror, 
drum 7 working - drum 5 mirror, and finally drum I; upper as working 
- drum £ upper as mirror. It should be noted that the program is 
divided into four independent parts and thus a start may be ini¬ 
tiated at any of the four divisions. 

OPERATION: 1. Set FI to 1*0001. 

2. Set PAK to 1*0000, (1*0110, 1*0216, l*032l*, optional). 

3. Depress Start Button. 

STOPS; (PAK) - 1*01*01 Final stop 

(PAK) a l*0l*51* Intermediate stop if error occurred while 
checking 201*3 numbers. 

OUTPUT: Typewriter is utilized for monitoring. 

1. START w-m - Indicates which test is being executed by 

noting the working and mirror drums. 

2. OKI - Indicates first 20l*8 numbers check 

3. 0K2 - Indicates second 20l*8 numbers check. 

ERROR 1. Obtain as print out in octal-of all errors occurring in 

ROUTINE: checking 20l*8 random numbers using the following format: 

Location Working Word Mirror Word 

XXXXX XXXXXXXXXXXX XXXXXXXXXXXX 

2. Optional Start 

a. Sut high order position of Q-register to one for 






TIME* 


3. NAMEi 


PURPOSEl 


METHOD! 


OPERATION! 


STOPS: 


OUTPUT! 
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repeat of teat uaing same working and mirror storage 
- Depress Start 

b. Depressing Start continues test sequentially. 

Approximately two hours for a complete test, 35 minutes each 
for the first three parts. 


ML MD2, Leap Frog 

Systems Development Oroup, 1 October 1956 
Lockheed Missile Systems Division 

This program is intended to test the arithmetic circuits, memory 
retention, transfer of information from core to drum to core, and 
the interpretation circuits of the 1103A. 

The program prepares a copy of itself which is transmitted ahead 
to a new core location. During this process the arithmetic and 
interpretation circuits are checked. After transmission, the 
core to drum’ to core exchange is tested except when the program 
overlaps FI. 

1. Set PAK to 1*6100. 

2. Set MS switches. 




2 


on 

Stop, 1*096 leaps 

Stop, 1 leap 

- 

off 

Continue 

Continue 

- 


3. Depress Start Button 

1. Final Stop - Either a failure in the arithmetic section or 

a check sum failure from the core to drum to 
core transfer. 

2. Intermediate Stop - Depends upon MS switch setting - 

depressing Start Button continues test. 

3. Any Other Stop - Failure of core memory. 

None 

Approximately 80 minutes for 1*096 leaps. 


TIMING! 
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42 
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45 
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00004 
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77777 
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REMINGTON RAND UNIVAC 



ST. PAUL DEPARTMENT—INFORMATION SCIENCE 


18 December 1956 
(Rev. 18 Feb. 1957) 

1103 TO 1103A CONVERSION ROUTINE 

I. TYPE: Service routine or subroutine. 

II. STATUS: Code checked and machine checked by Bill Wallace. 

III. PURPOSE: This routine changes A and Q machine addresses from 20000 and 

10000 to 32000 and 31000 respectively, and detects magnetic tape 
and external function instructions. Various options are provided 
for print out of those addresses where an A or Q reference is 
modified, (indicating also u or v portion) and punching the con¬ 
verted program in bioctal or flex code on paper tape. 

IV. USAGE: 

A. STORAGE REQUIRED: The program is coded in RECO form and it is there¬ 
fore possible to operate the program from a location providing 320 
octal drum address and 2000 additional octal drum addresses for a 
HSS image region. Such a location of the program and image region 

is done by assigning the desired starting addresses to regions BB 
and IR respectively, of the reco tape (see coding) all other regions 
being in HSS, and hence remaining the same. The regional assignment 
can be on a separate tape from the main program reco tape, but this 
tape should have END. c.r. at the end. (See RECO write-up.) 

In addition to the RECO tapes, a bioctal tape of the program is 
available where the program is stored at 66000-66320, with the image 
region 76000-77777. 

B. INPUT-OUTPUT: Output is a punched tape in bioctal or flex code of 
the changed program if desired. This option makes use of tape output 
routines which are not integral parts of this conversion routine. 

These output routines (Bioctal or Flex Dumps) are included in the 
Serial 9 1103 Service Library or may be found in the Minimum Service 
Routine Library for 1103A (See USEful Note #1). Also the following 
is printed out as the conversion routine is operating: (This is also 
optional.) u aaaaa or vaaaaa, where aaaaa is the address where an A 
or Q reference has been modified and u or v shows whether the u or 

v address of the instruction has been modified. Also, TAPE is printed 
out when an 1103 magnetic tape instruction is encountered, and EF 
and address when an external function command occurs. 

C. OPERATING INSTRUCTIONS: 

(1) Used as a service routine proceed as follows: (the term 
"program" here refers to a program to be converted.) 

a) Master clear, MD start 

b) Set PAK to 66000, (or bb) 




c) Insert in Q the first address of the program 

d) Insert in the last address of the program 

e) Insert in v address of the address of the last 
instruction of the program, or the last address of 
the program wherein one wishes to have A and Q 
addresses modified. 

f) Insert in v address of A^ the following codes for the 
various options: 


00000 

bioctal punch of converted program and print 
out of addresses where modification occurs. 

00001 

same as above but no print out. 


00002 

flex code punch of converted program 
print out. 

and 

00003 

same as above, but no print out. 


00004 

print out, but no punch of converted 

program. 

00005 

no print out and no punch of converted program 


A 56 0 66010 (bblO) stop occurs if a gross error is 
made in the set-up, e.g. transposition of Qy and Q^,. 

Used as a subroutine, proceed as follows: 

a) Program the transfer of parameter as listed above to 
the A and Q registers. 

b) Execute the instruction: 

RJ bb2 bb 

c) The options are selected in the same manner as previously 
shown. 


a) The use of this conversion routine assumes that the 
program to be converted is stored either all in core 
storage or all in drum storage. 

b) The conversion routine is coded for operation on either 
an 1103A, or on the 1103 (Serial 9) at RRU, St. Paul. 

If this conversion routine is to be used on an 1103A, 
provision must be made for the output routine mentioned 
in IV-B above. 
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V. CODING 

A. Regions 


re bb 66000 


re 

ual24 

re ir76000 


re 

val37 

re ff30000 


re 

upl55 

re crO 


re 

prl62 

re cb33 


re 

tpl73 

re cd54 


re 

ef200 

re cf71 


re 

cs205 

re kk75 


re 

dd212 

re mmll2 


re 

tt310 

Program 

bbO 

45 

0 

bblO 

1 

56 

0 

bblO 

2 

45 

0 

(ff) 

3 

0 

0 

0 

4 

0 

0 

0 

5 

0 

0 

0 

6 

0 

0 

0 

7 

45 

0 

ff 

10 

tp 

Q 

bb6 

11 

It 

10000 

bb5 

12 

It 

00000 

A 

13 

tp 

0 

ir 

14 

tp 

bb 

0 

15 

rp 

31777 

bbl7 

16 

tp 

1 

irl 

17 

rp 

30400 

cb 

20 

tp 

bbl 

crl 

21 

rp 

31777 

bb23 

22 

tp 

irl 

1 

23 

tp 

ir 

0 

24 

tp 

bb6 

Q 

25 

tp 

bb7 

A 

26 

ej 

bb2 

bb31 

27 

rj 

70036 

(70006) 

30 

45 

0 

bb2 

31 

rj 

70036 

(70006) 

32 

56 

00000 

bb 

33 cbO 

ej 

dd43 

cd 

34 1 

ej 

dd64 

cd2 

35 2 

ej 

dd65 

cd5 

36 3 

ej 

dd66 

cdl3 

37 4 

ej 

dd60 

cd6 

40 5 

tp 

cr5 

A 


Entrance 
Error stop 
Subroutine exit 
Storage first address 
Storage last address 
Storage initial A 
Storage initial Q 
Constant 


Store HSS 

To start of core program 
Conclusion of program 

Restore HSS 

Restore Q for dump 

Test, subr. or serv? 

No, subr. 

To exit 


No punch 
Punch flex 
No print, no punch 
No print, punch flex 
No print, punch bioctal 
Last address 
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41 

6 

tj 

dd 

cf 

42 

7 

qt 

ddl 

cr4 

43 

10 

iq 

q 

25 

44 

11 

qt 

ddl 

cr3 

45 

12 

tv 

cr3 

mm 

46 

13 

la 

cr3 

a 17 

47 

14 

tu 

A 

kk 

50 

15 

ra 

cr4 

dd60 

51 

16 

st 

cr3 

tt 

52 

17 

ij 

tt 

kk 

53 

20 

45 

0 

bbl 

54 

cdO 

tv 

dd67 

mm4 

55 

1 

45 

0 

cb5 

56 

2 

rs 

bb27 

dd60 

57 

3 

rs 

bb31 

dd60 

60 

4 

45 

0 

cb5 

61 

5 

rj 

cdl 

cd 

62 

6 

tv 

up4 

ualO 

63 

7 

tv 

up4 

ual2 

64 

10 

tv 

val5 

va7 

65 

11 

tp 

val5 

vail 

66 

12 

45 

0 

cb5 

67 

13 

rj 

cd4 

cd2 

70 

14 

45 

0 

cd6 

71 

cfO 

ra 

cr5 

dd3 

72 

1 

ra 

Q 

dd2 

73 

2 

tp 

cs 

pr 

74 

3 

45 

0 

cb7 

75 

kkO 

tp 

(ff) 

Q 

76 

1 

tp 

Q 

ttl 

77 

2 

qt 

dd5 

tt3 

100 

3 

tp 

tt3 

A 

101 

4 

ej 

ddlO 

ef 

102 

5 

ej 

ddll 

mm 

103 

6 

ej 

ddl2 

mm 

104 

7 

rp 

20014 

kkll 

105 

10 

ej 

ddl3 

tp 

106 

n 

rp 

20004 

kkl3 

107 

12 

ej 

dd27 

mmlO 

no 

13 

rj 

ua6 

ua 

111 

14 

rj 

va5 

va 

112 

mmO 

tp 

ttl 

(ttl) 

113 

1 

tp 

kk 

A 

114 

2 

It 

25 

A 

115 

3 

st 

dd6 

A 

116 

4 

ej 

cr5 

bb21 

117 

5 

ra 

kk 

dd7 


HSS? 

Store first address 

Store last address 
Set up transfer 
of Modified Contents 
Set up first address 
to be modified 
No. of words 

Error 


No punch 


Flex punch 


No print 


Add 76000 to V 

Add 76000 to U and V 

Arrange to print core address 


Mask operation code 

External function 
Final stop 
Interpret 
Commands where 
V only to be modified 
and tape commands 
Split instruction, 
Modify U only 
Modify U 
Modify V 

Transfer modified 
Content 

Obtain current 
Address 
Test, end of 
Modifiable address 








* 

• 

41 
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120 

6 

ra 

mm 

dd60 

Add 1 


• 

121 

7 

45 

0 

cbl7 



122 

10 

rj 

ua6 

ua 

Modify U only 



123 

11 

45 

0 

mm 




124 

uaO 

tp 

ttl 

Q 




125 

1 

iq 

Q 

25 

Mask 1 st octal digit 



126 

2 

qt 

dd33 

tt4 



127 

3 

tp 

tt4 

A 




130 

4 

ej 

dd34 

ua7 

Q? 



131 

5 

ej 

dd35 

uall 

A? 



132 

6 

45 

0 

ff 




133 

7 

ra 

ttl 

dd36 

Add 21000 



134 

10 

45 

0 

up 

To print 



135 

11 

ra 

ttl 

dd37 

Add 12000 



136 

12 

45 

0 

up 




137 

vaO 

tp 

ttl 

Q 




140 

1 

qt 

dd33 

tt4 




141 

2 

tp 

tt4 

A 




142 

3 

ej 

dd34 

va6 

Q? 



143 

4 

ej 

dd35 

valO 

A? 



144 

5 

45 

0 

ff 




145 

6 

ra 

ttl 

dd40 

Add 21000 



146 

7 

45 

0 

vail 

To print 



147 

10 

ra 

ttl 

dda 

Add 12000 


O 

150 

11 

pr 

0 

dd42 

Carriage return 


151 

12 

pr 

0 

dd43 

Space 



152 

13 

pr 

0 

dd44 

« v« 



153 

14 

rj 

prlO 

pr 




154 

15 

45 

0 

va5 




155 

upO 

pr 

0 

dd42 

Carriage return 



156 

1 

pr 

0 

dd45 

"U" 



157 

2 

pr 

0 

dd43 

Space 



160 

3 

rj 

prlO 

pr 




161 

4 

45 

0 

ua6 




162 

prO 

tp 

kk 

Q 




163 

1 

iq 

Q 

6 




164 

2 

tp 

dd43 

tt2 

Index 



165 

3 

iq 

Q 

3 




166 

4 

qt 

dd46 

A 




167 

5 

at 

dd47 

pr6 

Print digit 



170 

6 

(pr 

0 

ff) 




171 

7 

ij 

tt2 

pr3 




172 

10 

45 

0 

ff 




173 

tpO 

rp 

20004 

kkl4 

Test for tape 



174 

1 

ej 

dd20 

tp2 

Instructions 


• 














175 

2 

pr 

0 

dd42 

Carriage return 

176 

3 

rp 

10004 

mm 


177 

4 

pr 

0 

dd60 

Print "taj " 

200 

efO 

pr 

0 

dd42 

Carriage return 

201 

1 

rp 

10005 

ef3 


202 

2 

pr 

0 

dd70 

Print "EF" 

203 

3 

rj 

prlO 

pr 

Print address 

204 

4 

45 

0 

kkl4 

To V address modification 

205 

csO 

rj 

cs4 

csl 


206 

1 

tu 

kk 

tt5 


207 

2 

rs 

tt5 

dd4 

Subtract 76000 from V 

210 

3 

tp 

tt5 

Q 


211 

4 

45 

0 

ff 


212 

ddO 

0 

0 

02000 


213 

1 

0 

0 

77777 


214 

2 

0 

76000 

76000 


215 

3 

0 

0 

76000 


216 

4 

0 

76000 

0 


217 

5 

77 

0 

0 


220 

6 

0 

11 

0 


221 

7 

0 

1 

0 


222 

10 

ef 

0 

0 


223 

11 

fs 

0 

0 


224 

12 

ip 

0 

0 


225 

13 

It 

0 

0 


226 

14 

45 

0 

0 


227 

15 

56 

0 

0 


230 

16 

pr 

0 

0 


231 

17 

pu 

0 

0 


232 

20 

rm 

0 

0 


233 

21 

wm 

0 

0 


234 

22 

am 

0 

0 


235 

23 

bm 

0 

0 


236 

24 

rp 

0 

0 


237 

25 

er 

0 

0 


240 

26 

ew 

0 

0 


241 

27 

sp 

0 

0 


242 

30 

sa 

0 

0 


243 

31 

sn 

0 

0 


244 

32 

ss 

0 

0 


245 

33 

0 

0 

70000 


246 

34 

0 

0 

10000 


247 

35 

0 

0 

20000 


250 

36 

0 

21000 

0 


251 

37 

0 

12000 

0 


252 

40 

0 

0 

21000 
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253 

41 

0 

0 

12000 


254 

42 

0 

0 

45 

Carriage return 

255 

43 

0 

0 

4 

Space 

256 

44 

0 

0 

17 

V 

257 

45 

0 

0 

34 

D 

260 

46 

0 

0 

7 


261 

47 

61 

0 

dd50 


262 

50 

0 

0 

37 

Flex code 0 

263 

51 

0 

0 

52 

1 

264 

52 

0 

0 

74 

2 

265 

53 

0 

0 

70 

3 

266 

54 

0 

0 

64 

4 

267 

55 

0 

0 

62 

5 

270 

56 

0 

0 

66 

6 

271 

57 

0 

0 

72 

7 

272 

60 

0 

0 

1 

flex code t 

273 

61 

0 

0 

30 

flex code a 

274 

62 

0 

0 

15 

flex code p 

275 

63 

0 

0 

20 

flex code e 

276 

64 

0 

0 

2 


277 

65 

0 

0 

5 


300 

66 

0 

0 

3 


301 

67 

0 

0 

bb32 


302 

70 

0 

0 

47 

Shift up 

303 

71 

0 

0 

20 

"E" 

304 

72 

0 

0 

26 

npn 

305 

73 

0 

0 

57 

Shift down 

306 

74 

0 

0 

4 


307 

75 

0 

0 

0 

Not used 

310 

tto 

0 

0 

0 \ 


311 

1 

0 

0 

0 1 


312 

2 

0 

0 

0 ' 

s. Temporary storage 

313 

3 

0 

0 

0 


314 

4 

0 

0 

0 


315 

5 

0 

0 

0 j 

1 
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A. Introduction, 


The 1103A. computer works internally in the binary number system. 
Therefore, all information (numbers and instructions) must eventually 
have a binary machine representation. This is usually given in octal 
notation, which can be considered a shorthand writing of binary numbers. 
Writing programs in this absolute fashion is rather tedious work. Be¬ 
sides taking a long time, it is liable to coding and clerical errors. 

It is possible to let the computer do part of the tedious coding work. 

A step in this direction is the regional coding scheme. Another step 
forward is called symbolic coding, a system which has been adopted as the 
standard coding procedure by USE. 

Symbolic coding replaces absolute numbers by names or symbols. As 

these names can be chosen to suggest certain ideas, a program in 

symbolic form is much more easily written and interpreted than the same 

program in absolute numbers. For example suppose we have to compute 

2 1 
y*(kx + mx + n) ,T" 

Using suggestive symbols for addresses and nemonic codes for the opera¬ 
tions, the symbolic program would be* 

START MP K TEMP 
AT M A 
MP A TEMP 
SA N 0 
DV P TEMP + 1 

Trans-USE-1 will accept this symbolic code, assign correct numbers for 
the nemonic commands, addresses for the other symbols, and thereby 
translate it into its absolute form which, e.g., could be: 

00200 710030001000 

00201 350033332000 








00202 713200001000 

00203 320033U00000 

00201* 730035001001 

The rules set Up for using this symbolic coding to be translated by 
Trans-USE-1 are explained in detail in the rest of the paper. 

B. Symbol 

A symbol consists of from 1 to 6 characters, at least one of which 
must be alphabetic. The characters permitted are all letters A-Z and 
all numbers 0-9. The following symbols have special meanings and cannot 
be used in the location column. 

1. The symbol n A w represents the octal number 32000 and refers 
to the accumulator. 

2. The symbol n Q w represents the octal number 31000 and refers 
to the quotient register, 

3. The symbol M D rt represents the octal number 1*0000 and is used 
, for references to the drum. 

1*. The symbol "FILL** in the operation or either address field 
indicates that that portion of the command is to be supplied 
by the program. In the u or v address fields, "FILL” will 
be replaced by the illegal address 30000.. When used as an 
operation symbol, "FILL** will be replaced by 00. 

C. Location 

The location column of a line of coding may be blank or may con¬ 
sist of a single symbol. These symbols are used for reference purpose 
only and do not, in any way, determine the order in which the instruc¬ 
tions finally appear in the memory. The sequence in which the instruc¬ 
tions are written determines the order in which they are to be executed. 
The special symbols A, D, Q, and FILL may not be used as location symbols. 
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Do Operation 


1, The two-character nemonic abbreviations as prepared by Remington 
Rand are used for basic machine operation codes. Thus TP stands for 11, 

AT for etc. In instructions requiring a "j" as part of the u- 
address the number w j w (<?<j £ 7 ) is appended to the nemonic operation 
abbreviation as a third character; so it will appear in the operation 
field rather than in the u-field. If j a 0, it may be omitted. To make 
coding easier, the number j may be replaced by a more suggestive character, 
e. g., ERB means ER1 indicating a reading from 10B. The oomplete list 
of these operation symbols is stated below* 


LT1 - LTR 

PU1 " PU7 (7 for 7th level) 

RP 1 ” RPV 
RP2 - RPU 

RP3 " RPB (B for both) 

NE " NEO 

2. Trans-USE-1 will also accept 2 or 3 digit octal operation 
codes, whether or not these represent legal operations. 


LT- LTO - LTL, 
PU - PUO - PU6, 
ER = ERO “ ERA 
ER1 -ERB 
EW - EWO - EWA 
EW1 «* EWB 


3. The operation symbols END, BREAK* RESERV, refer to pseudo¬ 
operations, see under G. 

1;. The operation symbols W B M and '’X" are used to write absolute 
constants, see under F, 

E. Addresses 

1, Reference to a line of coding is made by putting in the u- or 
v-field the location symbol of that line to be referenced. 

2. The programmer might wish to write an address not as a symbol 
but as an absolute number. Also, several instructions require a number 
in one of the addresses, e. g,, SP u k or RP jnv. In these cases the 
coder will write a number in the address field. Trans-USE-1 will 
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consider numbers to be decimal, unless the letter B i@ attached at the 
end, in which oase they are considered octal. For example, 16 is the 
decimal number 16 and 32000 B is the ootal number 32000 or the address 

c' - ' 

of the accumulator, normally written as ’•A”. 

3. In certain cases it is convenient to express an address as a 
combination of location symbols and numbers. It is legal to specify 
the sum or the difference of any two. 

A few examples might be helpful. L00P2 and L00P3 are different 
symbols, their addresses are not related to each other. L00P2 + 5 
designates the J>th line of coding after LOOP2. L00P2 - 3 is accord¬ 
ingly the 3rd line preceding L00P2, L00P2 - COMP will be translated 

into the difference of the absolute addresses assigned to the two 
symbols. 

F. Constants. 

Constants and numbers are always full words. Therefore, there is 
no separation of a word into operation, u- and v-fields. The machine 
internally considers all numbers to be integers. USE has established con¬ 
ventions for writing octal anddecimal integers. On the coding sheet 
the letter n X n or M B W has to be written in the operation column to 
specify decimal or octal integers respectively. The u- and v-fields 
are considered as a unit, into which the desired number is entered. 

The number will be considered as a constant only if a B or X appears in 
the operation column, A sign may precede the digits. If omitted the 
constant is considered positive. 

A few examples and their absolute octal equivalents follows 

X 100 

oo ooooo ooikk 

B 100 

00 00000 00100 
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x - 5 

77 77777 77772 


B 2 00001 
00 00002 00001 

Incidentally, the last constant could also be faritten by leaving the 
operation blank, write 2 in the u-field and 1 in the v-field. See 
under E2 and D2. 

0. Pseudo-Instructions 

These are instructions to the translation routine and do not form 
part of the translated program. 

1. "BREAK" (BREAK ~~) Symbolic programs may be longer than 500 
lines of coding, which is the capacity of one Unityper 200 ft. tape. 
Programs up to this size are typed on one single magnetic tape. Longer 
programs can be handled in segments of approximately 500 lines each. 
When reaching the end of a tape, the typist simply types a line of 
coding consisting of the word "BREAK" in the operation column, leaving 
all other columns blank (see example under LI). When encountering the 
BREAK operation, the computer will stop and wait for the next reel to 
be put on the same tape unit. Pushing the start button on the console 
will then cause the translation to continue. When reading from cards. 
BREAK may be used if desired. 

2. "RESERV"s (RESERV N N) This operation reserves, in memory, a 
block of N temporary cells. The symbol appearing in the location 
column will be assigned the current value of the address counter. This 
counter will then be incremented by the amount specified in the v~field. 
To make the program acceptable to the USE-compiler, both of the u and 
the v~field must contain the number of cells to be reserved. The 
coding lines containing a RESERV operation will occupy one cell each 

in the translated program. Therefore, they have to be at the ©nd of 
a program directly preceding the "END" line. The end of a program will 






then look something like this? 


LOC 

OP 

u 

V 

remarks 

C16 

0 

1 

1 

address, modify 

C17 

TEMPI 

0 

2JUB 

0 

20 in u 
sin t 

IMAGE 

RESERV 

36 

36 

card image 

BLOCK 

RESERV 

120 

120 

tape information 


3. "END'* t (END—* The pseudo-instruction END is on the last line 
of coding. There must not be a symbol in the location column, the u- 
and v-fields are ignored. "END" signals the end of the program to be 
translated. 

H, Coding Sheet. 

The coding sheet is divided into $ columns. The maximum permiss- 
able number of characters for each column is as follows? 


Location 

6 

Operation 

6 

u-address 

13 

v-address 

13 

Remarks 

18 


I, General Rules of Coding 

1. Any symbol may appear only once in the location column of a 
program. If it appears more often, the first (lowest) address will be 
assigned to that symbol. 

2. References to subroutines and service routines are made by 
using an established symbol for each. If, for instance, a subroutine 
symbol is MATRIX, which could mean a matrix-multiply routine, the 
jump to the subroutine would be 

RJ MATRIX + 2 MATRIX. 

Where to aupply operands and to acquire results may be found in a 
table of subroutines, which will be available at each installation. 
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See also USE-st t uiiiards i'or subroutine's* 

3. The normal use of the repeat instruction (RP jn w) requires « 
jump command in cell 00000 (the w is placed in the v portion). The 
programmer should make sure that it is there. 

U. Free symbols? Usually the programmer does not care what 
addresses are being assigned to symbols of temporaries. He then does 
not write them in a location column. These so-called free symbols will 
be assigned successive addresses at the end of the program in the order 
in which they appear on the coding sheet. 

5. Symbols may consist of an arbitrary mixture of letters and 

numbers. Some characters therefore, may cause some uncertainty as to 

which one is meant. The character "O’® may be the letter "0 5 ® or the 

number zero. To avoid confusion it is good policy to choose only 

symbols which imply an unambiguous meaning. A '®0 n standing alone is 

always a zero. Symbols like CO or P03 should be avoided. A general 

rule to go by is that 0 is always a zero unless included between 
/ 

letters. In handwriting care should be taken to distinguish between 
2 and Z, 1 and I, 5 and S. 

6. If all or part of an instruction will be computed and supplied 
by the program, the symbol FILL should be written in the corresponding 
columns. This is a safety device. If the program does not provide the 
information for some reason or other, the computer will stop with an MCT 
or SCO fault indication. See also under Bh. 

7. Never assume any temporary cell to initially contain certain 
information. Sometimes the whole memory will be cleared before reading- 
in a program. Then the temporaries would be zero. However, it is safer 
not to take this for granted. 

Jo Arrangement of a Program 

Programs to be translated and assembled consist of three sections 
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which must b® written in the following order* 

1* Section 1* words* containing all words subject to address 
modification* usually commands and relative constants* 

2. Section 2* words* containing all absolute constants* 

This section also inoludes those temporaries which are assigned loca- 
tions by placing their symbols in a location column* 

' I 

3* Seotion 3# words* consisting of the number of temporaries 
used* not including those already accounted for in seotion 2* 

The total memory space a program needs is n^ ♦ n^ ♦ n cells, 

3 

All information constituting a program is contained in sections 1 and 
2* Therefore, the translation extends over n^ ♦ n^ words only, 

K* Parameters 

For checking and control purposes each program must be preceded 
by 6 lines of coding containing the following parameterst 

1* lilt Initial translation address which shall be assigned 
by the translation to the first line of the body of the program, 

2* n^* The number of words subject to address modification 

(see under J)* 

3, xigt The number of absolute constants and* possibly* certain 
temporaries (see under J), 

U»* ny The number of temporary locations used (see under J), 

5* pt Is used only in subroutines* and is the number of operands 
or oontrol data needed by a subroutine. 

6, rt Is used only in subroutines* and is the number of re¬ 
sults yielded by a subroutine. 


In programs other than subroutines the values of p and r are 
irrelevant* but they must not be omitted* In addition to the above 6 
parameters* a 6 character identification tag for the program* the 
first 2 characters identifying the installation (for Holloman* HO)* 






must appear in the comments field of the first line of coding. The 
above mentioned parameters may be given ae constants using either the 
B or X operation. So the first 6 lines of coding will look like this* 


OP 

u 

v Remarks 

B or X 

ITA 

Identification 

B or X 

n i 

Title of Program 

B or X 

n 2 

Title of Program 

B or X 

n 3 

Other information, 

B or X 

P 

as* date, coder. 

B or X 

r 

project number, etc. 


L, Typing a symbolic program 

For input to the computer a symbolic program must either be 
typed on magnetio tape with the Unityper, or key-punched on IBM oards. 

1. Magnetio tape. 

After inserting a reel of tape into the Unityper and loading 
the leader, the program is typed starting with the first line of coding 
(containing ITA). The fields are separated by commas, even if they 
contain no information. Spaces may be typed anywhere; they are ignored 
by the translation program except in the remarks column. After a line 
of coding has been typed the rest of the blockette is filled with 
zeros (tabulator key). An inter-blockette space is then generated with 
the trip key. Each coding line will thus occupy one line on the Unityper 
paper and correspondingly one blockette on tape. 

To give an idea of how a program looks on paper, here are a few 
examples* 

TRANS, TP, FILL, BT, COMMAND TO BT 
MODIF, RA, TRANS, C18, MODIFY + 20 
,TP, BT ♦ 1, A, OPERATION TO A 
,D, 31U5926, PI SCALED ♦ 7 
,BREAK, „ 
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Note that each line normally has U commas. Only for constants 
(B and. X operation symbols) are there 3> because the u and v fields 
are considered as a unit. 

A program might be too long for one reel of tape. Then the 
typis' must type the BREAK instruction on the end of that tape before 
continuing on a new one. See under 01. 

2. IBM - Cards. 

The five fields of the coding sheet are assigned certain columns 
enfthe carti-s. The rest of the card is used for information generated 
\}y"Trans-USE-lj in tthis way cards punched out by the translation pro*> 
gram, containing both'the symbolic and absolute program 4f or side by 

listing, may be rreuasd-f or input. The TiJdld alltse&tion is as 
follows t 

Card Columns ' 1 1 — 6 location 
7 - 12 operation 
13 - 25 u-address, constants 
26 - 38 v-address, 

39 - 56 remarks 

57 - 60 absolute octal address 
6 l - 72 absolute octal word 
73 - 75 decimal sequence number 
76 insert digit 

77 - 80 identification tag, last U 
characters. 

Besides punching the information from the coding sheet, the key punch 
operator has to punch sequenoe numbers. These (positive) numbers must 
be in ascending order. This enables the translation routine to check 
<on the correct sequence ^sf the cards read. The sequence numbers on the 
.first card may be any. Including zero. The sequence che$k may be bypassed 
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by setting a switch on the console of the computer® 

M a How to make Changes in a Program 

1, Corrections % Replace the incorrect cards by correct ones* 

2. Deletions 3 Simply take out the unwanted cards. 

3c Insertions? New cards may be inserted any place in the 
program® They should contain the sequence number of the card after 
which they are inserted and also an insert digit, which will be regarded 
in the sequence test as a decimal fraction added to the integral se¬ 
quence number. 

After each change the program must be retranslated. Care should 
be taken to correct n^ and n^ when making changes® 

N, Sl 2 e limit of a program 

Trans-USE-1 has been coded for the "minimum 1103-A%which contains 
U096 words of core memory. There is, however, no fixed limit on the 
size of a symbolic program, as far as the translation goes. The only 
restrictions is the number of different symbols,which cannot exceed 2U5« 
This number does not include the special fixed symbols and the subroutine 
symbols. For the assembly the si^e of a program is directly determined 
by the oore capacity. The following two conditions must both be satisfied* 

1) The assembled program must not go beyond address 07200. For a 
program without subroutines the last line of coding should not 
go beyond that point. If subroutines are used, the last word of 
the last subroutine must stay under this limit. 

2) The temporary region used for execution of the program should 
not exceed core capacity (address 07777). 

As the lowest initial assembly address IAA is 00011;, a complete program 
can have up to 3700 words, and U 083 words including the temporaries. 

Larger programs can be handled, if they can be broken up into independent 
sections. 
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INDEX 


A 

2, 4 

location 


3, 6, 8 

address, absolute 

4, 8 

n l n 2 n 3 p r 


11 

n , combination 

5 

numbers 


4 

" , modification 

10, 11 

0 (zero or letter o) 


9 

" , counter 

7 

octal operation 


4 

assembly 

15 

operation 


3, 4, 8 

m 

4, 5 

parameters 
program arrangement 


10,11 

10 

blockette 

12 

« title 


12 

BREAK 

6, 13 

pseudo instriictions 


4, 6 

characters, permissable 
cards 

2 

7, 12, 13, 14 

Q 


2 

cell 00000 

8 

remarks 


8, 12 

comma 

12 

RESERV 


7 

column 

8 

RP j n w 


8 

coding sheet 

8 

sequence numbers 


14 

constants 

5 

sign of constants 


5 

» , absolute 

10, 11 

size limit 


15 

»• , relative 

10 

service routine 


8 

corrections 

14 

side by side listing 


13 

D 

2 

subroutine 

symbols 1, 

2, 

8, 11 

8, 9, 15 

deletions 

14 

« , free 


9 

END 

7 

n , location 


3 

FILL 

3, 9 

n , operation r j t 

9, 

10, 11, 15 

IAA 

15 

« , special 


2 

ITA 

11 

temporaries 7, 

9, 

10* 11, 15 

identification tag 

11 

n , multiple 


7 

insert digit 

15 

translated region 


10 

insertions 

J 

last line of coding 

14 

typing, unityper 


12 

7 

X 


4, 5 
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A. Normal Operating Procedure, 

1. Make sure Trans-Use-1 is loaded (on 60,000 drum). 

2. Make sure the subroutine library is loaded (if the programs 
to be translated refer to same), 

3. Put symbolic program tape on TUI (tare unit'logical!* or nut 
symbolic cards in reader, do not cycle Bull. Place blank 
cards in punch. Set Bull for 3 fields. 

U. Put tapes on TU2, TU3, end TUU. TU3 and TUh must be rewound. 

5. If input from tape, turn MJ1 on. 

6 . Optional: Tf check on sequence numbers from input cards 
shall be bypassed, turn MJ2 on, (Applies for card input 
only). 

7. If assembly is to be indirect, turn MJ3 on. 

8 . Set PAK*60,000 and start. 

Stops* PAK»6o,121 Alarm print. Look at tvuewriter print¬ 
out, Refer to list of alarm prints 
below and decide what to do, 

PAK«60,002 Typewriter has printed a "t" indicating 
the end of current translation. If 
another translation is wanted, go back 
to If assembly is wanted combine 
with 9. 

PAKo0bLtl2 MJ1 on* Tape with symbolic urogram is 
used up, a "BREAK" is found. Put next 
symbolic tape on TUI and start, 

MJ1 off * A "BREAK" card is' read. Put 
more input cards in reader, cycle Bull 
once and start, 

REMARKS* Should Bull mispick a read eard, start all over. Should 
Bull mispick a punch card, resume computation at 
0U660. All cards except the first 6 will be renuhched. 
This procedure good only if less than 120 cards have 
been punched so far, 

9. Recheck choice for direct or indirect assembly. Tf change 
is wanted, set MJ3 now, and reset PAK to 60002. 

10. Direct run* Start 

Indirect run* Put "Assembly Control Card** in reader, do not 
cycle Bull, Ascertain that tUli is rewound, and start. 
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Stops: PAKs60121 Alarm nrlnt. look at tyoewriter print-out. 

Refer to list of alarm nrints below and 
decide what to do. Alarm orint with taeword 
"assemb" Indicates successful end rf 
assembly" To execute first assembled urogram, 
start. Programs 2, 3, 4, of this assembly 
can be started at 00011, 00012, 0O013 re¬ 
spectively. If another assembly is wanted, 
combine with 11. 

11. Put tane with translation(s) or TTT3, another tame on TU4, then 
go to 9. 

B. List of Alarm Prints . 

Each alarm print consists of a 6-character tagword fof 1 owed by 
the contents of A and Q. The comouter stops with PAK=£0121, To 
resume computation, start. 

An explanation of the alarm prints fo^ows, soecifled by the 
different tagwords orinted. 

•'seq no'" Occurs on card input only. 

Fault: The last card read has a sequence number not 
larger than the previous one. A and 0 hold the new 
and old sequence numbers in excess 3. 

Remedy 1: Tf prooer card sequence does not matt°r, start. 
Remedy 2? Get deck cf cards in urnner order and go back 
to 3 and rewind TU3. If previous translations are 
already recorded on TU3, a new tape should be taken. 

"parity 1 ' A=l. Occurs during translation only. 

Fault? A parity error is found whfe read*™* TU2 or 
TUI. 

Remedy: Determine from console which tane unit failed. 
Try another tape or another tape unit. 

"length" Fault: The length of the program being transV ied 

dres not agree with the sum of the parameters & N?, 

A contains the difference between acttial length and Ni 
+ l# 2 f Q contains the actual length, both in octal. 
Remedy: Start correct parameters or program later. 

"limit" Fault: The symbolic program contains more than 245 
different location symbols. The 245 th symbol is in 
cell 06525, it may be found also from +he last cards 
read. 

Procedure: Go off the computer. Reduce number of 
symbols in urogram. 

"trn tp" A=l. 

Fault: A parity error is found while reading translat¬ 
ed program from TU3 during assembly. 

Remedy: Repeat assembly with another bias setting or 
with tape on another tape unit. 
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"ass tp" A=I 

Faults A parity error is found while reading back the 
assembled program from TU4 for verifying. 

Remedy: Try another bias, another tape, or another tape 
unit for TU4. If MJ3 is off, start. Assembly is 
repeated. If MJ3 is on, go to 11. 

a=1 

Faults Assembled program was recorded incorrectly on TU4. 
Remedy: Start.A new recording will be attempted. Do 
not idhanpe tape or tape \mit. Change of bias setting 
is permiasable. 

"excess" Faults The program to be assembled, including sub¬ 
routines, exceeds core memory. There are two cases: 
A=7200: The last word of the complete program 

will have an address greater than 07200, 
A=7777 The temporary region required by the 
program exceeds core caoacity. 

Remedy: Repeat translation or assembly with lower ITA 
or IAA. Do not continueoperation, because assembly 
routine will be clobbered. 

C. Format of "assembly control card” 

Only field I is used, fields II and III are ingored. Field I is 
again divided into 6 smaller fields, 6 columns each, which must contain 
the following information 


Field 

Columns 

Contents 

I 

1-6 

new name for program to be assembled, 
(program tag) 

2 

7-12 

initial assembly address (IAA) in octal, up 
to 5 octal digits. Address may be anywhere 
in the field. 

3 

13-18 

name of first program to be assembled. 

4 

19-24 

] names of other programs to be assembled 

5 

25-30 

\ together with the first one. Must be left 

6 

31-36 

Jblank if not used. 


D. Incorporation of subroutines . 

All subroutines to be used by a symbolic program must be in standard 
USE-format, i.e., 

a. They must be stored on the drum. 

b, They must have the 5 parameters, Nj, P, R, stored 

directly in front of themselves. 

o. They must be coded relative to 01000, 

d. The normal exit must be two lines later than the entry 

line. 

e. The subroutine must be self-contained. 


k 






In the symbolic program a subroutine is referenced by its name or 
symbol. The translation will replace it by an octal symbol, a number 
between 30400 and 30777. A subroutine referencing another one will do 
so by using this octal symbol. 

For each subroutine we have now 3 items: 

1. Name or symbol, to be stored in DS-region 

2. Octal symbol, to be stored in DA-region 

3. Drum location, to be stored in DL-region 

How to put these into the Trans-Use-1 routine may be best explain¬ 
ed by an example. Assume we have the following 4 subroutines. 


Name 

Drum Location 

Highest Reference 

Cells to be 
reserved for octal 
symbol 

SSI ' 

40200 

SSI + 3 

4 

SS2 

43000 

SS2 + 11 

12 

SS3 

40500 

SS3 + 2 

3 

SS4 

40600 

SS4 + 4 

5 


The number of cells in the last column is determined by the 
number of controls of the subroutine. It must be at least 3, because 
the normal exit is the 3 rd line always. The regions DS, DL and DL 
have the drum addresses 61756, 62045, and 60210 respectively. The 
cells to be filled for our example are therefore: 


Address 

Contents 


remarks 

61756 

00 0000656504 


name of l 6 ^ subroutine, SSI 

61757 

00 0000656505 


SS2 

61760 

00 0000656506 


SS3 ( DS ) 

61761 

00 0000656507 


SS4 

62045 

oo 0000030400 


Octal symbol of SSI 

62046 

OO 0000030404 


» .. 

62047 

00 0000030420 


" - S S1 ( DA ) 

62050 

oo 0000030423 


» 1 . S $ 1 + 

62051 

00 0000030430 


Octal symbol of future subr. 

60210 

00 0000040200 

1 

Locations of subroutines in 

60211 

00 0000043000 

I 

\ library (DL y 

60212 

60213 

00 0000040500 

00 0000040600 

4 


Note that the next free octal symbol must be filled in the DA- 
region. Up to 47 subroutines can be handled. 


lo 
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SUBJECTi APL Floating Point to Stated Point Conversion Subroutine 


This subroutine converts a decimal floating point number in 
excess 3 form in two 1103A words to a stated point number in excess 3 
form in two 1103A words. 

The format of the decimal floating point number is as followsi 
First 1103A word ^ Mg 1-^ 


where 


Second 1103A word M^ Mg 


a. the sign of the mantissa is represented by the symbol 
A(octal 01) if positive, 

b. the sign of the mantissa is represented by the symbol 
—(octal 02) if negative, 

c. the eight digit mantissa is equal to or greater than 
0.1 but less then 1.0, 

d. the sign of the characteristic is represented by the 
symbol +(octal 63) if positive, and 

e. the sign of the bharacteristic is represented by the 
symbol —(octal 02) if negative. 

This subroutine will convert to stated point numbers only those 
floating point numbers in which c^“ 0. If c^ / 0, the floating point 
number is transferred to the output without conversion. When conversion 
occurs the format of the stated point number is as follows: 

Decimal First 1103A Second 1103A 

Characteristic Word Word 


-9 

A .0 

0 

0 0 

0 0 0 0 0 M^ 

-8 

O 

• 

<1 

0 

0 0 

o o o o 

-7 

A .0 

0 

0 0 

o o o Ml % ^ 

-6 

A .0 

0 

0 0 

0 0 Ml Mg 

-5> 

A.o 

0 

o 

o 

-• 

0 M 1 Mg M 3 


A*0 

0 

0 0 

M L M 2 M 3 ^M $ M 6 

-3 

A.O 

0 

0 

M2 m 3 \ 

-2 

A.O 

0 

m 1 h 2 

M 3 % M 6 My Mq 

-1 

A.O 

”l 

"2*3 

\ «6 m 7 ^ 0 

0 

Mg m 3 ^ 

M$ M6 M ? Mq 0 0 






Page ! 

Decimal 

Characteristic 

First U03A 

Word 

Second 111'3A 
Word 

♦1 

A ^ .11, Kj ^ 

"S H 6 H 7 M 6 5 0 

+2 

A Mjl Mg *M 3 1^ 

m 5 h 6 m 7 m 8 c 0 

+3 

A \ m 2 m 3 ^ 

►V M 6 M 7 M 8 0 0 

+U 

A Mjl Mg M 3 *• 

«5 m 6 m 7 M 8 0 0 

+5> 

A ^ Kg m 3 ^ ^ 

.m 6 m 7 m 8 o 0 

+ 6 

A Mjl Mg M 3 ^ 

»6 • M 7 «6 0 0 

+7 

4 Ml ^ ^ ^ ^ 

m 6 h 7 . 1^0 0 

+8 

A *L 

»6 «7 «t> • 0 0 

+9 

4 

m 6 h 7 k 3 o . 0 


where 

a. the sign of the number is represented by the symbol 
A(octal 01) if positive, 

b• the sign of the number is represented by the symbol 
- (octal 02) if negative, and 

o. the bar over the last digit indicates that the number 
has been rounded* 

A general flow chart and the coding (not machine checked) in the 
AFL format is enclosed* 
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TOO 

00 

F 

F ( 

excess 3 floating 

T01 

00 

F 

F 1 

point input 

T02 

00 

F 

F i 

f stated point 

T03 

00 

F 

F ] 

( output 

POOl 

LQ 

U001 

31006 

r c x to a 

2 

QT 

T01 

A 

! 

3 

EJ 

U002 

POO 7 

Is C x - 07 

u 

TP 

TOO 

T02 

/ Floating point 

5 

TP 

T01 

T03 

( number to output 

6 

MJ 

Z 

Exit 

\ 

) 

7 

TP 

U003 

Q i 

r 

, Store characteristic 

8 

QT 

T01 

TJ0I1; 1 

r 

i 

9 

QS 

U013 

T01 

Place zeros in char, part < 

10 

LQ 

U001 

31011; j 

Store sign of 

1 

QT 

UOll; 

U015 / 

characteristic 

2 

TP 

uoolt 

Q 

i 

? Store Cg 

3 

QS 

U013 

UOll; 

i 

It 

RS 

uoiU 

uou 

Subtract excess 3 from 

5 

TP 

uoo5 

* ( 

?-c 2 

6 

ST 

UOli; 

U016 | 

► 

7 

TP 

U013 

U017 

f Clear storage 

8 

TP 

U013 

U018 i 

[ 

9 

TP 

UOlli 

A 

C 2 to A 

20 

ZJ 

P021 

POlil 

Is C 2 - 0? 

1 

ST 

uooo 

U019 

C 2 - i 

2 

TP 

uoi5 

A ! 

Is char, pos.7 

3 

EJ 

uoo6 

P03U / 

> 


V 
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P02l| 

RJ 

PO $6 

P0U7 

Write sign 

* 

RJ 

P 062 

P060 

Write point 

6 

RJ 

P 0*9 

PQ57 

? write C 2 Zeros 

7 

IJ 

U019 

P026 

J 

8 

RJ 

P0*6 

P0U7 

) Write 10 - 0 2 digit* 

9 

IJ 

U 0 l 6 

P028 

) 

30 

RJ 

P078 

P06? 

Round 

1 

TP 

U017 

T02 

( Stated point number 

2 

TP 

U018 

T03 

[ to output 

3 

MJ - 

z 

Exit 

* 

U 

RJ 

po 56 

P0U7 

Write sign 

5 

RJ 

po $6 

P0k7 

) Write Cg digits 

6 

IJ 

U019 

P035 

1 

7 

RJ 

P 062 

P060 

Write point 

8 

RJ 

P0$6 

P0U7 

/ Write 10 - digits 

9 

IJ 

U016 

P038 

I 

Uo 

MJ 

z 

P031 


1 

TP 

uoo5 

U 016 

Set index 

2 

RJ 

Po £6 

P0U7 

Write sign 

3 

RJ 

PO 62 

P060 

write point 

k 

RJ 

P056 

poU7 

? WTite 10 digits 

$ 

IJ 

uoi6 

Pol *k 

l 

6 

MJ 

z 

P 031 


7 

TP 

UOOl 

Q 

MaBk to <1 

8 

RJ 

P068 

PO 63 

Shift new word 

9 

SP 

TOO 

OOOiili 

/ 

$0 

SA 

T01 

z 
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?o5i 

LA 

A 

00006 

\ Shift old word 

2 

LT 

Z 

TOO 

( 

3 

TP 

A 

T01 

\ 

U 

QT 

T01 

A 

Reid digit 

$ 

AT 

U018 

U018 

Write digit 

6 

MJ 

Z 

F 


7 

RJ 

P068 

P063 

Shift new word 

8 

RA 

U018 

uon 

Write zero 

9 

MJ 

Z 

F 


6o 

RJ • 

P068 

P063 

Shift new word 

1 

RA 

uoi8 

U007 

Write point 

2 

MJ 

z 

F 


3 

SP 

U017 

OOOkh 

i 

h 

SA 

U018 

Z 

( 

5 

LA 

A 

00006 

y Shift new word 

6 

LT 

z 

U017 

( 

7 

TP 

A 

U018 


8 

MJ 

Z 

F 


9 

TP 

TOO 

A 

( Is rounding 

70 

TJ 

U008 

P078 

[ required? 

1 

TP 

UOOO 

U019 

Set rounding digit 

2 

TP 

U012 

uoi5 

Set index 

3 

TP 

uoo$> 

U016 

Set 9 tester 

u 

TP 

U001 

Q 

Mask to Q 

$ 

QT 

U018 

A 

Digit to A 

6 

EJ 

U016 

P079 

Is digit - 97 

7 

RA 

U018 

U019 

Add one 
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P078 

MJ 

Z 

F 


9 

QS 

U0X3 

uoie 

Make 9*0 

80 

LQ 

Q 

00006 

Shift mask 

1 

LA 

U019 

00006 

Shift 9 tester 

2 

LA 

U016 

00006 

Shift rounding digit 

3 

IJ 

uoi5 

P07S 

Repeat $ more times 

U 

QT 

U017 

A 

Digit to A 

5 

EJ 

U009 

P088 

Is digit - 9? 

6 

RA 

U017 

uooo 

Add one 

7 

MJ 

z 

P078 


8 

QS 

U013 

U017 

Make 9 **■ 0 

9 

RA 

IJ017 

TJ010 

Add one to next digit 

90 

MJ 

z 

P078 
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uooo 

00 

z 

00001 

Modifier 

UOOl 

00 

z 

00077 

Mask 

U002 

00 

z 

00300 

Excoss 3 zero 

U003 

00 

00007 

71111 

Mack 

uooU 

00 

00007 

77700 

Mask 

U003 

00 

z 

00011 

Decimal 9 

U006 

00 

00006 

30000 

EXC033 3, + 

U007 

00 

z 

00022 

Excess 3f • 

UOOS 

10 

n 

Lt 

z 

Escess 3, 3 

U009 

00 • 

z 

0001U 

Excess 3)9 

UOIO 

00 

ry 

Zj 

00100 

Carry 

uon 

00 

ry 

Lk 

00003 

Excess 3 

U012 

00 

z 

00003 

Index 

U013 

z 



Zero 


UOlU Z 

uoi3 z 

UOl6 z 

U017 z 

U018 z 

UOl? z 
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DESCRIPTION Tho D.T.M.B. Omnibus will perform 18 independent functions 
from control words manually typed at the computer, or previously prepared 
on a control tape. Some of the more frequently used functions are: 

COPY BLOCKS CORRECT SINGLE OR CONSECUTIVE WORDS IN BLOCKS 

COMPARE BLOCKS -^FORWARD OR BACKWARD MEMORY CLEAR AND INITIAL READ 

SKIP BLOCKS - FORWARD OR BACKWARD SEARCH BLOCKS, THEN COPY 

REWIND TAPES WORD SEARCH COPY BLOCKS WHILE SEARCHING 

SAMPLE BLOCKS OR BLOCKETTES SELECT AND MERGE DATA BY WORDS 

VERIFY TWO UNITYPED TAPES HIGH SPEED PRINTER COEDIT 

DIGIT CHANGE BY EXTRACTION PATTERN STOP 

Functions which produce selected output, r.uch as diucropancios in 
comparison or sampled data , ray be printed on tho Supervisory Control 
Printer or written on tape. Information, i? written on tape, io prepared 
for printing on the High Spocd Printer using a Memory Dump board (10 words 
across with word spacing). 

Many functions can be completely described by a single control word 
of 12 digits* Tho first character in tho control word specifies tho 
function the Omnibus routine is to perform. The interpretation of tho 
remaining 11 digits io dependent upon the function performed. Wherever 
possible tho format of tho remaining 11 dif'.ta has boon standardized. 

Tha standard control word format io as follows: 

digit 

1 Control function 

2 Input Servo number 

3 Output Sorvo number 

4 Supervisory control or Servo number for discroponcios 
during «ompar.i son 

5 Specification for rewind of input servo 

6 Specification for rewind of output servo* 

7 Write density for output sorvo 

8 Optional comparison of input with output tape(combine 
with digit 4) 

9 12 Number of blocks 

Some functions require additional information to bo supplied in 
order to perform the one ml, ion. Tho additional information is in tho 
nature of a sub-function and/or a quantity. Functions and sub-functions 
aro interpreted Inr tho (konibus routine to perform certain operations, but 
quantities are information supplied as word substitutions. 

eg. Function Copy with corrections 

Sub-function Block said word number of correction 

Quantity (Word to be; substituted for existing word) 

Sub-function End of corrections 
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CONTROL 

1. Manual. Control words nay ba typed id usually at the keyboard 
after the routine prints CONTROL WD. If a function requires additional 
information, appropriate words will bo printed on the S.C. Printer 
before any roqueul for a typo in in imdo. At the conclusion of any 
function except the Initial Re vd and S top functions, tho routine will 
ask for another CONTROL Wl). 

2. Contx'ol Tape. Control word a may bo previously prepared on a 
tape in the order of their do,sired execution. The loot valid conti'ol 
function on o Control Tape must bo either an Initial Rend or a Stop 
function. The Control Tapo may be mounted on cuy UNISF.RVO except 
minus (-). Set tho Conditional Tronafer Breakpoint corresponding to 
tho Conti’ol Tapo UNISERVO number. Clour C, and input roody light if 
cot, and actuate the start bar. The routine will otop on the Breakpoint 
set. FORCE TRANSFER on the Breakpoint will cause the routine to print 
TAPE CONTROL and proceed to read tho Control Tope and perform the functions 
specified on tho Control 'Capo. Tape (u), if used in any of tho control 
functions, and the Control Tape will be automatically rewound with inter¬ 
lock when interpreting a Stop or an. Initial Read function on tho Control 
Tape. No Rewind control functions oro required to rewind the Control 

Tape or Tape (u). 


TO START THE CONTROL TAPE AT OTHER THAN THE BEGINNING, SET 13KPT. 
6, after selecting the Tape Control Breakpoint. The first word on the 
Control Tape will be printed on tho S.C. Printer end the computer will 
stop on BKPT. 6. FORCE TRANSFER on. MPT. 6 will cause the following 
print out to appears ELK AND WD OF CONTR WD. Typo In tho block and 
word number of tho location containing the desired starting control 
word in tho following forms OO’nbbb OOOOwd. Release BKFT. 6. Tho 
Control Tape will be rewound without interlock and road forward to 
the block and word specified by tho typo in. Tho Control Tape will 
be processed starting with tho specific control word located. 


TO CHANCE A CONTROL WORD ON THE CONTROL TAPE SET BKPT. 5« 

The computer will stop after printing each control word about to be 
processed. If n FORCE TRANSFER on BKPT. 5 is performed, the routine 
will print out TYPE HEW V.D and sot up. a type in. Type in a control 
word to replace the last control word printed. BKPT. 5 cannot bo un¬ 
to change an incorrect sub-control function. 
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OPERATING INST RU CTIONS 

Omnibus Instruction Taps Any norvo, if using DTMD Service Routino 

Locator which automatically changes all serve "IS" instructions 
( to "A" oorvo number. THE INITIAL TAPE SELECTOR BUTTON MUST 
' KAMA IN SItf'TO THE SERVICE ROUTINE TAPE NUMBER AT ALL TIMES. 

The following control words will cause the Service Tape to bo 
read to locate the necessary subroutines i II, K, L, Q, V, and U. 

At the conclusion o.f tho tiubroutir.ee, or a clear C operation, 
the Omnibus routine is read back Into the memory. 

The Sorvico Routine Tape is rewound without interlock after any 
reading of the Omnibus roulvino or its erberoally stored sub¬ 
routines. 

Block Subdivider Button - If tape output- is used (a non zero digit 
typed as digit four of a control lord) poo notes on Tupo u. 

No print out to instruct the oporttor of this condition is 
made. The H. S. I’. Codod.it routine (P) will instruct the operator 
to sot tho appropriate Block Subdivider Button und Stop, 

Breakpoints - A feu breakpoints nay bo used during tho processing of 
certain control functions. 

BKPT 5, BKFP 6, and Control Taco number ~ see. Control Tope 

BKPT 1 - See Search, end Copy While Scorching 

BKPT 9 - See VJord Changer 

BKPT 3 - Sco n. S. P. Codedit 

BKPT 0, 1, comma, and Tape number - Sec Verify 

BKPT 5 - Sue Lino Morgs 

BKPT 7 - Seo Copy with Corrections 

Notes to the Operator. 

The Initial Read Function (I) is the only control word which 
destroys tho Omnibus Routine in the memory. 

Ths Omnibus Routine may bo used for both control tape and 
manual option. It should not bo necessary to Initial Read the 
Omnibus Routino into tho memory between consecutive users, no 
matter which option is used. 

The Clear C operation will rosc-t t ie O.anibus Routine to the 
original conditions, with tho exception of thoMoek counter 
and the location storing tho press ice of tape u during any 
set of control words. The presence of tape u is cleared only 
by a Stop function. A Clear C operation roe;/ bo performed at 
tiny time, except during tho reading of the Service Tape. 

Clear C to set the Breakpoint option for the Control Tape, if 
tho last word printed was ’’CONTROL WD. !I Clear tho Input Ready 
signal before proceeding. Tho Control Tape Breakpoints are 
sequenced for execution before tho print out of "CONTROL UB". 




The "R" control word will not rewind tepo u no long as it" is 
romeborod in the memory. The Stop function resets thio memoiy 
location to ssoro and rewinds tape u with interlock. If it In 
nocessary to rewind tape u because cf computer’ trouble. Cloar 
C to bring up the CONTROL UD find type in the "R" function with 
tape u specified no tho 4th zone alphabetic equivalent of the 
numeric tufte number or rewind tho tape manually. 

Any control uord which makes uoo cf tape u will complete the 
last partial block stored in tbo memory and write the data on 
tape u at tho conclusion ot the control function, 
if it io necessary to determine the block counter after tho 
inability to read a designated number of blocks - Clour C and 
bring up the CONTROL WD. Type in 500901 000000 as the control 
word. Memory location 901 will contain the number of blocks 
road correctly, and copied* if specifiod by tho process. 


Storage locations within Omnibus for Specific Information 


Block Counter 

901 

Block Limit 

902 

Control Uord 

903 

Input Block (tape s) 

500-599 and output for Z 

.Second Input Block (tap© SR) 

560-919 for C, C., and V 

Control Tape Input 

620-679 

Output Tape Option (tape u) 

700-759 


X, W Q and K 


RERUN 


Clear C, and Input Ready if the neon is lighted. Register I :io 
normally empty at tho completion of any cortrol uord except tho Initial. 
Road Function. 

Tho Clear C operation will reset the Omnibus Routine to the original 
conditions. USE ONLY IN CASE OF ERROR 0.1 TO PROCEED THROUGH CONTROL 
TAPE BREAKPOINT OPTION. 


When the computer stops on a normal Stop Instruction DO NOT CIJSAR 
C OR rl. The computer has boon stopped after printing specific instructions 
to the operator on the S, C. Printer or from a stop control word or an 
Initial Rend control word. 

The actuation of the Start Bar after a Stop control function will 
aond control to COO. 

The actuation of tho Start Bor after an Initial Read control word 
will transfer the contents of rl to 000-059 and aond control to 000. 

Do not Clear C if on error has been rude during the reading of 
tho Omnibus Routine into tho memory from the Service Tape. The Clear 
C operation may bo momentarily nen operative when searching for certain 
control function subroutines. 
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omnibus aurisavisoicf control print ours requiring no action 

Type of 

Reason Function Control 


End of Subroutine 
End of comparison subroutine 
End of H. S. P, CodedIt 
End of Lino More® 

End of Vorify 


KQWX'Z Doth 
C D W X Z Both 
H Both 
L Doth 
V Doth 


No print out» designate end of functions 

Tope number n contains vr.ocx blocks of 
oditnd outfit 

Word on which uaarch Is modo was not 
found on tape 

Block and vrord nuiob«r of so arched word 
f &>ird 

Total number of blocks morged 

Result of forcing BKPT u to oolectvord 

Result cf not forcing BKPT u to 3eloct 
word 

Result of forcing BKPT j to advance word 

Result of not forcing D LPT < is !|o advance 
word 

Result of forcing BKPT 0 to print last 
output word 

Result of setting up nkipi inst. of tor 
BKPT{«)to omit cho..co previously 
printed 

If more than 47 consecutive subcontrol 
woi*ds for the Word Changer aro 
listed on the control tape, the 
last subcontrol word used will bo 
printed and subsequent eubcontrol 
words skipped until the "?<" sub- 
control word is reached 

Printed after BKPT 9 its forced to omit 
changing o. specific word 

Rosult of forcing BKPT option for 
control tape 

All control words ore printed whon 
operating from Tape Control Option. 
Subcontrol worda are not printed, 
excopt Lino-Merge 6ubeontrol words. 


B F I R S 5 9 Doth 


H 

K 

K Q 

L 

V 

V 

V 

V 

V 

V 


Both 

Do til 

Both 

Both 

Doth 

Both 

Both 

Both 

Both 

Doth 


W 


Tape 


W 


Manual 

Tape 


Print Out 

AAENUACOFXAA 

AAENtifiCHECKA 

AKNTVNCODEDIT 

AENEAMERGEAA 

^ENEAVEniFYA 


TnABLKSAxxxx 

NC&SUCHAWORD 

ABxxxxAWxxAA 

MHfiABLKSxxxx 

/SELECTAsAAA 

^SELECTANONR 

/STEPAAtefAA 

j&TEPANONEAA 

/PRIORAWORDA 

/NOTADOIIFAAA 


LASTITEMUSED 


ASKIPPEDAA!!A 

TAPKACONTROL 
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OMNIBUS SUPERVISORY CONTROL PRINT OUTS REQUIRING ACTION 




Typo of 


Action 

Function 

Control 

Print Out 

Type In control word. 

ALL 

Manual 

ACONTRjOLAWEA 

Wrong fonn of control word, typs in 
replacomont• 

ALL 

Moth 

REJFCTAWORDA 

Typo in subcontrol word for location 
of correction 

Q X 

Manual 

ABLKMNIAWDA 

Typo in subcontrol word for Lino 

Mergo 

L 

Manual 

TYPFACONTROL 

Typo in subcontrol word for Word 

Changer 

w 

Manual 

CCC OLOEEEN EW 

Typo in Date for H. S. P» Cododit page 

H 

Manual 

ATYPEADATECA 

Typo in Hooding of data being edited 

H 

Manual 

TYITAHEADING 

Typo in subcontrol word for H.S.P. Cododit 

H 

Manual 

CIOLLLSSSBBB 

Subcontrol word wrong of listed out of 
block sequence. Type in replacement 
for subccntrol word. 

L Q W X 

Both 

CHECXAORDERA 

Type in QUANTITY on which scorch is made 

X Q 

Manual 

« 

AWHATAWORUAA 

Typo in QUANTITY, used after "Ax" sub- 
control when x / 0 or Z 

L 

Manual 

WHATAFILIAWD 

Typo in ac many words as specified by 
n in subcontrol word "T K 

L 

Manual 

TIPEIiJA'vi'ORDS 

Last output block in Line Merge is not 
full, type in a Quantity to bo used 
to fill to the ond of the block. 

L 

Both 

BLKAHOTAFULL 
WHATAFIL1AWD 

Typo in word to replace compared words in 
Verify after force transfer on Blcpt 1. 

V 

Both 

/TYPilAWORDPA 

Verify. The lost word on the input tape 
is printed cut. Occurs when omissions 

V 

Both 

/LASTAVAL] i A 
WORIiYVWAAA 

or duplications of verified data produce 
a last partial output b.look» Type in a 

QUANTITY to be used to fill the last 
output block. 


/TYPFAFILIAA 

Set S. C. Printer for 3 words. Actuate 
start bar. Occurs when discrepancies 
are found and S. C. Printer option is 
opoclfled. 

C D V X 

Z Both 

SETASCA3AWDS 

Sot S. C. Printor to normal. Actuate 
start bar. 

V 

Both 

SETASCAl 1ORML 

Sot block subdivider listed and actuate 
start bar. 

H 

Both 

SETAB.S.D.xA 

Mount a blank on output servo, previous 
tape 13 full. 

H 

Doth 

IffuAHEUATAFE 
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Stew. 
:■ f. 


From forcing transfer on BKPT 5 to Tap© 

chnngo control word on control tape. 

Typo in replacement control, word* 

From forcing transfer on 13KFT 6 to atari. Tapa 

a control tap© at other than boginning. 

Typo in block and word of control tape 
starting word in form OOObbbOOOOud 



■ 

TXPEANEViAWDA 

ABLKAANDAWDA 

OFACONTRAWDA 
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NOTES ON THE USE OF THE OPTIONAL TAPE OUTPUT - TAPE u 

Six control words can cnko uno of the optional tap© u output. Those 
aro C, P, 3, W, X and Z. The information written on tape U is prepared 
for printing on the High Speed Print©)* using a memory dump board. If 
tho data contains no multi-lino or fast food symbols, it can be printed 
on NORMAL for boot results. Tho 0, D„ W# X# and Z control )>;orde use 
thro© words in the block©tte for: tho old word, block and word number, 
ai d tho new word. Tlio related servo numbers ar© listed in tho heading. 

Tho remaining words in the blockotte aro filled with space b. 

TJie sampla routino (3) -ill niaka uoo of ono, two, six or oevon words 
in the blockotte, depending upon the choice of digits 3 and 6 in tho S 
control function. Sampling a block without listing tho block number will 
print ono word, or six words if sampling blockotteo. If tho block number 
is printed, two or covon words of the blockotto will be used when sampling 
blocl:a and blockottos respectively. 

At th© complotlon of any conti-ol function using tape u, the partial 
block in th© memory is filled with ope.ces and written on tape u, so that 
tho pertinent information will bo on tape when entering a now control 
sequence• 

The blocks written on tape u aro v-rltten at 100/in. density and are 
not counted, ao that care must be exorcised by tho user not to exceed 
1250 blocks* 

Tho Omnibus routino does not remind tu© operator to sot the Block 
Subdivider Button when specifying tape u. When the fourth digit of the 
above control word 3 is not zero, the appropriate Subdivider Button must 
bo set. 

It has been assumed that tho same servo number will bo used for tape 
u, by the progreiamar on any sequence c f operations requesting optional 
output. If it Is desired to y servo number for tape u during a 
sequence of operations, it ust bo ronroiuberod that only the last tape 
number used v;lll contain n Printer Step at tho end of the tape and bo 
automatically rewound when a Stop function is given. Tho other tapon 
will not contain a Printer Stop symbol, but cun bo rewound with the 
It control word after a now tape u numbor has been initiated. 

Tape u will not respond to the R control function evou when called 
for. This safeguards any nccuailatod output from being dostroyod by 
an operator error in typing an incorrect tape rewind control function* 
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If it io necooociry to restart tho process and rewind tap© u, type in 
a Rewind control function sud opocify tho oorvo u number by thd 4th 
zono olphabatlc equivalent of the oorvo number or rewind tapo u 
manually. 

Kever uso t.npo u for tho output fox- tho H. 3. P. Codedit. Tho 
II. 3. P, Codedit requires a npocial plugboard and rouinds both input 
and output tapes boforo starting tho cododit* which would destroy any 
previous data on tapo u. 
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COPY WITHOUT correction; 


E s t u r„ r t d e b b bb 

, P Tt 


COPY [Z] from tnpo (a) to tapo (t.) (bbbb) blocks at (d) density. 

d *= 0 for 100/in. t d / 0 for 20/ln. density* 

If digit c is rrna tor tha n ze ro, compare tapes (s) and (t) word by 
word reading in the backword direction. No discrepancies should 
occur. If the two tapes differ» the words which differ, together 
withth« block and word number of each discrepancy will be either 
writter, on tape or printed on the Supervisory Control Printer as 
specified by digit u. 

u * 0 Print on S. C. Printer 

u / 0 Write on Tape (u) (u) must bo 1 to 9 or Set 

Block Subdividor u. 

The r digits control the rewind options for the input (r Q ) and output 
(r t ) tapes. 

r « 0 Do not rewind tapo. Reposition tape bbbb blocks 
forward if comparison hea token place, 
r « 6 Rewind tape wlthoi.it interlock. . * 

r *= 8 Rewind tape with Interlock. 


COPY WITH CORRECTIONS 


X a t u r B Tj. d c b b b b 


COPY WITH CORRECTIONS [X] from tape (c) to tape (t) a total of (bbbb) 
blocks at (d) density, d = 0 for 100/in.* d / 0 for 20/in. density. 

A ].3it of corrections together with tho block and word number of the 
correctionss terminated by a word of all Z's will follow the control 
function. 

If digit c is gre ater th an r.or o tapes (o) and (t) are compared word 
by word reading in the backward direction. Tho words which differ, 
together with tho block and word number.’ of each discrepancy will bo 
written on tape or printed on the Supervisory Control Printer us 
specified by digit u. 

u = 0 Print on 5. C. Printer 

u / 0 Write on tapo (u) (u) must be 1 to 9 or Sot 

Block Subdividor u. 

The r digits control tho rewind options for the input (r B ) and output 
(r^) tapes, 

r r - 0 Do not rewind tapes. Reposition tape bbbb blocks 
forward if comparison has taken place, 
r E 6 Rewind tapo without interlock, 
r " 8 Rewind tapo with interlock. 


: 4 


4k 
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Sub - control word a 
nnxxxxOOOOy y 


Z Z Z Z Z Z Z Z Z Z Z Z 

When using the nn digits to specify a consecutive liet of corrections, 
follow tho subcontrol word with nn QUANTITIES to bo supplied as corrections. 
The block and word number represent the location of tho first correction. 
When operating from manual control, the first old word will bo printed on 
tho S. C. Printer, and nn consecutive "input ready" signals will bo act 
up without printing tho consecutive dd words. 

NOTE: All subccntrol words must, bo listed in ascending order by block 
number. 

When a subcontrol word from a Control Tape specified a consecutive 1 
list of corrections and the nn digits, describing the number of corrections, 
have been typed incorrectly, tha routine may attempt to decode a QUANTITY 
as a subcontrol word and produce one of two kinds of errors. 

1. Adder Alpha 

The routine has attempted to add digits 1 and 2 to 11 and 12 
of a Quantity instead, of a cubcontrol word. Digits 1 arid 2 are added to 
11 and 12 of a subcontrol word to determine if nn + yy is > 60.. 

Remedy: Set BKPT 7 

SCI CR 000000 U00224 • 

Proceed as for CHECK ORDER Remedy. 

2. CHECK ORDER printed, followed by a QUANTITY rather than a 
subcontrol word. 

Remedy: If the word printed out after CHECK ORDER is not a 
subcontrol word, but a QUANTITY, and the QUANTITY is either thB 2nd 
consecutive correction word when nn was typed us 00, or the nn + 1st 
consecutive correction whore nn was less than tho number of corrections* 
the following insertions may be made: 

Set BKPT 7 

Type in a now subcontrol word nnxxxxOOOOyy 
Where yy is the location of the pi’inted QUANTITY, nn is tho number of 
corrections to be mado, arid :cxxx is the same block number as the previous 
subcontrol word. 

FORCE TRANSFER on BKPT 7 to cause the routine to use 
tho type in aa an insertion, rather than a replacement. A word of all 
"Z's" may not be typed as on insertion when using BKPT 7. Sea Control 
Tope BKPT 6 option. 


n n Number of -consocutivo corrections 
listed under the Sub-control word 
nn *» 00 or 01 for a single word 
correction. Consocutivo corrections 
must bo within the block number 
listed. 

x x x x Block number 

y y Starting word, number for corrections 
End of corrections. 
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COMPARE FORWARD 


C oj sj u r fl j r,,^ 0 0 b b b b ij 


COMPARE [Cj tapes (oj) and (»>) reading In the forward direction 
(Web) blocks. If any difforoncon occur between tapes (oj.) arid (c-,) 
record tho word from towo (n-,) f tho block nnd viorcl number f and the’ 
word from tape (o^) on the Supervisory Control Printer if digit 
u « 0. If digit u / 0 write diacvopancien on tape (u). u / 0 iruut 
bo 1 to 9 or Sot Block Subdiyidtir u. Tho r digits control the 
rewind option fer tapes (sp) and (s-,). 

r = 0 Do net rewind tape* 
r « 6 Rewind capo without interlock, 
r « 8 Remind tape with interlock. 


COMPARE BACKWARD 


D 


u r 


cr. 


0 0 b b b b 


Some as .COMPARE FORWARD except tapes era read and compared in 
tho Vveclcward direction. All discrepancies ore listed in a descending 
order with the first block road in backward an block bbbb and tho last 
block read as 0001. Ths tapes are not r cepc^s l tiono d for,raid if rewind 
is not specified. 


SKIP FORWARD 


F b 0 0 0 0 0 0 b b b b 


SKIP FORWARD [F] (road in the forward direction) on tapo (s) 
(bbbb) blocks. 


SKIP BACKWARD 


BcOOOOOObbbb 


SKIP BACKWARD [il] (read in the backward direction) on tape (a) 
(bbbb) blocks. 


REWIHD TAPES WITHOUT INTERLOCK 


RsossssSooaO 


M 


REWIND [It] tho tapes specified by the digits o. Digits {&) 
must bo 0 S 1 to 9 or Any number of tabes nay be rewound with 

a oingle control word. Fill tho unused digit positions with aero. 

It is not necessary to typo tho eepvo numbers in any special order 
end zeros my bo Interspersed * 

If tapo u has been written on at any time during tho use of tho 
Omnibus routine» tho "Ii n control function will omit tho .winding 
of this tape even though called for. This safe guards the information 
on tapo u from receiving a Printer .9top block which would destroy tho 
first block on tho tape if allowed to rewind. Tho Printer Stop is 
automatically supplied, whon n STOP OR INITIAL READ control function 
is executed* and tape u as rewound with Interlock. 

! 

MOTEf It;i3 never necessary to rewind the control tapo (if used) 
or tapo u. Tliia operation in performed automatically at the execution 
of a STOP’ or INITIAL RKAD function. 
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InaOOOOOOOOO 


W.MO EY CLEA R, IHITIA T. HEAD 

Clear the memory to zero if elicit a " 0. If digit a / 0, clear 
the memory to Stop Instructions with the address of lino number inserted 
in tho stop instruction, o.g. 900060 900060 

900999 900999 

Hoad one block from Tapa ( 0 ) into rl. The computor will Stop. 

Actuation of tho start bar will cause (rl) to go to 000-059 and 
control will be transferred to lino 000. Tho Omnibus Routine has 
boon dootroyod. 

\v v 

If tapo (u) has been specified during my previous Omnibus 
Control function, tho Initial Hoad function will causo a Printer 
Stop block to bo written on Tape (u) and Tope (u) will ber>» round 
with interlock. 

i 

If a control tapo has boon used, the Initial Head Function will 
cause tho control tope to bo automatically rewound with interlock. 

Tho last control word for either manual or control tape option 
should be an Initial Read or a Stop function. 

s;£0P 99999999999 9 

H 

The control tape, if used, will bo rewound with interlock. Tape 
(u)» if previously specified, './ill z-ocoivo a Printer Stop b ( lock and 
bo rewound with interlock. The computer wi .1 bo stopped. Mie Omnibus 
routine is resot to tho initial conditions and tho storage for control 
tapo and tape (Hi) are cleared. 

Actuation a the start bar will send control to 000 (same an a 
Clear C operation). 

Tho lust control word for either manual or control tape option 
should bo a Stop or an Initial Hoad function. 


SKIP - HO OPF.tl/VTTOd 


0000 0 0 000000 


.Omnibus will perform a skip operation during a tape control option 
only. It ia uood to delete control words from a control tape If certain 
functions aro not to bo performed, so that retyping of a control tapo 
is not necessary. 





SAMPLS 


3 b k u r Q x w v b b b b 

SAMPlIS [Sj ono word in each block or blockotto, -tho locution 
specified by digits (ww), from taps(tj) for a total, number cf bbbb 
blocks. If digit x " 0, sample ono word per block. If digit .. 
cample ono word por blocketto. The campled words will bo printed 
on tho S. C. Printer if digit u * 0 and written on tape (u) if u f 0. 
Digit u must bo 0, 1 to 9 or minus {-)« 

If digit k p 0 the block number of each sampled word will bo 
omitted in tho print out. 

If digit 1c 0 the block number v/il.1 appear for each now block 
campled. 

When tho output is prepared for tape (u), one, tv.'o, eix, or 
coven words will appear in ouch H* S. Printer bloclcott©, depending 
upon the specifications for digits k and x* 

Sampling by blocks will produce either one , or two words per 
output line. 

Sampling by block©toss will produce either cix or coven words 
per output line. When samplingliockettoa, digits (wv) must lio 
between 00 and 09» which specifio3 tho word position within the 
blocketto, to sample correctly. 

Tho r digit controls the rewind option for the input tape s. 
r «* 0 Do not rewind Tape 3 . 
r * 6 Rewind Tapo 0 without interlock, 
r « 8 Rewind Tapo o with interlock. 

PRINTOUT OR BL OC KWRIT E 500 m o n 0 0 0 000 

Tho "5" control word in primarily provided to aid the operator 
in determining the block counter number, without manually sotting 
up'the Static Register* when a taps camot be l'ead t,o its specified 
block limit. 

Clear C and typo in control word. 500901 000GOO will' cause this 
inctuuctiou word to bo executed and the block counter in 901 will 
contain tho number of’the luat correct block road (and written if 
during copy). 

The control word may bo used to write a block of scros on a 
top© if typed as 5n0700000000 provided no output tupo u option has 
boon performed which uoes 700-759 as tho output block, and tho H s 
V or W functions have not boon performed since tho lust memory clear 
operation. 

Tho second instruction in tho wold may bo used for u limited 
selection, o.g. 00, 10, 50 or 5n instruction. 


SEARCH, THEN COPY WI TH CORU EC Tiq ih Q e 4, 0 T a r % uub bbb 

Follow the control word with u 1? digit. QUANTITY on which tho 
uoarch in ma.de. The eonrcJh lo made on *0.1 "2 digits. 

vu > 59 All words e.ro ooarohod 

vrw < 59 O.aly ovo word, eo upaaified. in block io aoarcl'.od 
bbtb Numbor of l (.ocke to bo copied with corrections} 

, includirifi tho block oortftlning the eearohod word. 

SEARCH [Q] on tope (n) until the. 12 digit QUANTITY supplied lo 
equal to tho oonrched word in location (ww)» then copy with corrections 
from tnpo (o) to tapo (t) (bbbb) blocked starting with the block 
containing tho asarohod word. Follow the QUANTITY with the sub-control 
words for COPY WITH CORRECTION' . True (t.) is written at ICO/in. pulse 
density. 

Tho r digits control the ro-n.r ; pt' >ns for tho input (r s ) and 
output (r-fc) tapes. 

r * 0 Do not i uncl tape, 
r ° 6 He wind tap without interlock, 
r " G Rewind tape with interlock. 

Tho block and word number of the searched QUANTITY will bo printed 
on the 3. C. Printer. 

To SEARCH WITHOUT COPY () n 0 0 r s 0 w w 0 0 0 0 set the block 
number equal to zero. The block and vrord number of tho searched QUANTITY 
will bo printed on tho S. C. Printer. Follow tho QUANTITY specified for 
the oearch with tho nokt control word. 

If it io desired search uftar the initial agreement of tho 
QUANTITY and the searched data not F1KPT 1 at tho beginning of the 
search process. The block and word number will be printed and the 
corputor will stop on 5f3T.Pl' 1. FORCE TRANSFER to continue tho coarch 
process. This procedure may bo continued an often as desired. If 
the word is never found nn thotaps* tho tapo will oithcr stop on 
a two block read or if c. blank tape beyond tho data, will cause the 
tape to road off tho end» 



COPY - NO CORRECTIONS. WHILE SEARCHIN G 


KBtOr 0 r^.wwbbbb 


Follow the control word with a 12 digit QUANTITY ou which the 
search is made. The search in made on fill 12 digitB. 

ww > 59 All words are searched. 

vw i 59 Only one word , as specified T in oach block 
in noarchod. 

bbbb Upper limit of blocks copi.od while searching. 

If bbbb is reached without finding the soarch 
word, the routine prints out NO SUCH WORD and 
procoeds to tho next control word. 

COPY [K] from tape (u) to tape (t) while soc-rching for agreement 
between the QUANTITY and tho searched word in por.ition (vw). Copy 
to and including the oiook containing tho searched QUANTITY. Tape (t) 
is written at 100/in. pulse density. 

Hi© r digits control the rewind options for the input (r s ) and 
output (rp) tapes. 

r - 0 Do not rewind tape, 
r * 6 Rewind tape without interlock, 
r c 8 Rewind tapo with interlock. 

The block and word number of the searched QUANTITY will bo printed 
on the C. Printer. 

If it is desired to copy and search aftor the initial agreement 
of the QUANTITY and tho searched data, act DKPT 1 at the beginning of 
the search process. The block and word number will be printed and 
the computer will stop on BKPT 1. PORCH TRANSFERtocontinue tho 
search process. This procedure may be continued as afton as desired. 
If tho word is never found on the tape when the upper limit block' 
count (bbbb) i3 reached, the routine will print out NO SUCH WORD, 
perform tho rewind option, and proceed to the next control word. 





h» s. p. coDEnrr hooooooooooo 

The Omnibus Routine will call in thn DTI® II. 3. P. CODED!T, 
which has been modified to be used as part of Omnibus» if desired* 
Tho control wards porfonand by the CODEDIT tiro described in UNIVAC 
MEMO 111. 

Tho control words associated with tho CODEDIT must not exceed 
60 words (not including the control function word HOOOOO 000000), 
but may be split betvoon blocks on a control tape. 

At the completion of the CODEDIT, the Omnibus Routine is 
automatically called back and subsequent wo''do on the control tape, 
if used, uro performed. 

If it is desired to type the control words for the CODEDIT in 
a separate block so that they may also be used by the ANALYZER 
routine for future processing, fill tho block containing tho 11 II" 
function with zero and compile the CODEDIT control words in the 
block following. The CODEDIT routine, :i.f called in by un Omnibus 
control tape, will consider tho first non zero word following tho 
"H” function to be tho date (the first CODEDIT control word). 

The H. S. P. CODEDIT may be called in by a manual option from 
Omnibus but perform e control tape CODEDIT by sotting BKPT 3 and 
FORCING TRANSFER when tho CODEDJ? has been located. 

When conforming a CODEDIT from an Grrvibas control tape, the 
control words are assumed to be on the same control tape. 

Do not U33 tape (u) as tho output for tho CODEDIT, because 
the input and output tapea aro rewound at the beginning of the 
CODEDIT and any accumulated data on tap 3 (u) will be destroyed. 
Information accumulated on Tape (u) free previous Omnibus control 
words will bo printed using u memory dump plugboard and the output 
from the CODEDIT requires a special b i-vcd. 

Korun: Clear C 

When the CODEDIT has been colled in from a manual control 
Omnibus, the Clear C operation will start the CODEDIT routine over 
again. 

When the CODEDIT has been called in from an Omnibus control 
tape, the Clear C operation will rocoll the Omnibus routine and 
perform the general Omnibus Clear C function. 
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U tils M ER GE - COPY BY WORDS LOtOOr OOOOOO 

Tho LINE MERGE routine permits :l»fo‘^out:!on to be* copied from 
many tapos to a single output tops on a word by word basis inatoud 
of a block by block blsia. The control word specifies only tbo . 
output servo number (i) and the output rewind option (r^.). r n 0. 

6 or H , do not rewind» rewind without interlock or rewind with 
interlock * respectively. Thn remaining oousrolo are performed by 
tho suboontrol words which follow the control word. 

The nubcontrol words permit throe options for copying data. 

1. Copy from capos (other than tho control tape). 

2. Type in data at tho console, or transfer dato. from the 
control taoo. 

3. Fill n specified number of words, or to tho end of tho 
current output block, with a specific QUANTITY. 

Sub control functions 

M BLK WD s bllr wd - Copy [Mj f:con tape (s) starting with 

V»lock and w*>rd number B LK Up to or' 1 
incO 'ding block sod word number bit. vd. 

AxOQOO OOnnxui - Add i.A j (mnu) words of tho came pulse 

ociiil Anutioa to the output tupo. If x ~ 0, 
words of sowo will tie written* If x « 2, 
words of ul.. "li will bs written. If 

I s the 1 ’.iJAIT.’JTY specified by the word 
wil l bo iffi'dxm on the output tape. 

Fill to tho end of the current output 
block with -ho QUANTITY specified by tho 
y. di.pt If thi- previous block hud teen 
completely filled prior to the execution of 
the suboontrol word, a complete block of 
fill digits will be written each true the 
suboontrol word is given. 

Transfer ['? j tho aovt mum words from 
the control taps, or typo in mum words 
at tho console (if cn manual option) to 
the out)>ut tope. 

End of Line Merge. 


AxOGOO 000000 


T00000 OOnnun 


zzzzzz zzzzzz 
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Failur® to complete the information in the last output block when 
all Z's ie supplied as a suboontrol word, will cause the routine to 
print out BLOCK NOT FULL and ask for a type in of a 12 digit QUANTITY 
which will be used to fill to the end of the current output.block* 

The number of blooks on the output tape will be printed on the S, G. 
Printer. 

, if . - . *-•.. * V..- : ‘ ;* v*.’ v 

No provision is made for rewinding tho input tapes uithin tho 
Line Merge subroutine, but may be suppliod as a M R" control word after 
the word of all Z's. 

The format of the "M" subcontrol word limits tho input blook number 
to three digits or 999 blocks. 

When the Lino Merge Control word ia specified, the routine assumes 
that all 10 servos on tho computer are (figuratively specking) about 
to read block one. The routine remembers tho numbei of blocks read 
from all servos, and will read the tape in the forward or backward 
direction to locate the starting block number, depending upon the 
previous operation on any spec:do servo (s). Block and word numbers 
are always specified in relation to thoir physical location on the 
tape and not related to the position of the reading head at any time 
except at tho very beginning when each tape number, regardless of 
previous motion, is a3aimed to be at tho block beginning for counting 
purposes. 

Information may be copied any numbei’ of times from tapes and no 
restrictions are placed on switching from one input servo to another 
and back again. 

The starting block :ind word number rjust be equal to or less then 
the ending block and word number for any single W M" subcontrol word. 

Tho routine assumes a minimum of one word will bo copied when supplying 
the ,r M" subcontrol word, Failure to moot this requirement will cause 
the routine to print out CHECK ORDER and call for a typo in of a 
subcontrol word to substituted for the wrror ono. 

If it is known in advance that a Lino Merge subcontrol word on 
a control tape i3 in error set BKPT 5. Each subcontrol word (on the 
Line Merge only) is printed on the S, C. Printer before it is executed. 
The compiter will Btop on BKPT 5 after printing each subcontrol word. 
FORCE TRANSFER on BKPT 5 after the incorrect subcontrol word is printed 
The routine will print out TYPE CONTROL, Type in a subcontrol word to 
replace the error. The Line Morga routr’ne ia the only routine which 
permits the correction of a subcontrol v/ord in connection with BKPT 5* 
BKPT 5 ia normally reserved for control word correction only. 





WORD CHANGER Wst ur g r t 4 o bbbb 


The Word Changer routine permits substitution of digits in tho 
operation parts, the addreoo ports of an instruction word, or in 
specified digit positions in a full wori. Sub control functions 
specify the mode of examination, the digit quantities to be searched 
on, the extractor to be used in tho comparison and the quantity to 
be substituted when equality is found. 

Tho word changor routine* may bo us id as a Code search operation, * 
searching on as many as 47 different adirersos simultaneously. Tho 
routine may bo usod to perform a variety of changes, such a3 changing 
all servo numbers, supplying a minus to all D, X, A or S Instructions 
or changing a group of addresses when constants havo been movod in 
the coding without listing oach change independently with an X control 
word. 

The complete list of subcontrol fuaction words ia stored in tho 
memory at the beginning of t.ho process. Each word on the input tape 
is compared against tho list and appropriateo changes are made whou 
agreement is foundo 


Copy (bbbb) blocks from taps (s) to tape (t) making tho designated 
changes described by the subcontrol list. Write on tapes (t) at pulse 
density (d) 0 If d » 0, write at 100/in, if d / 0, write at PO/in. density. 


If digit c is gr eater than z ero , compare tapes (s) and (t) in 
the backward direction, printing the differences on the So C. Printer 
if digit u * 0, or on tape (u) if u / 0. If c is " 0, no comparison 
will take place. 

Tho r digits control the rewind options for the input (r.) and 
output (r^.) tapoG. 


r » 0 Do not rewind tape. Reposition tape bbbb blocks 
forward if comparison h i3 taken i.laco. 
r *• 6 Rowind tape without interlock, 
r * 8 Rewind tape with interlock. 

Sub-control words - For 1/2 word operation. 


CCC OID EEE NEW 

It 

I 

I 

?! 

h 


CCC - OPR if dLgits 1-3 and 7-9 (operation 
part of im instruction word) are to bo 
examined, 

CCC «* AKD if d Lgits 4-6 and 10 - 12 (addreoB 
part of in instruction word) are to bo 

examined» 

01,D - Thrae di,*it quantity (of operation or 
address) on which tho search is made. 


no 




EEE *- Extractor pattern used to dotermlno 
t.ho ©quality of tho old pjlttarn and 
the lnoortion of tho 1?EW.. If all 
NEW « Three dipit quantity which is used 

( in conjunction with EEE) to replace 
tho OLD quantity- 

ZZZ ZZZ ZZZ ZZZ End of list for modification. 


Sub-control words - For full word oporation 


CCC OLD EFE NEW 

CCC « 

FUL7 AWORTLA/b 


12 digit3for full word control. 


OLD « 

( 

) 

12 digits for old word. 


EEE « 

( 

) 

12 digit extractor 


NEU - 

( 

) 

12 digits for nou word. 


Comparisons and substitutions are made by 
the extractor pattern of a full word. If 
all digits of tho OLD word aro to bo 
compared, the extractor must be all ones. 

ZZZ ZZZ ZZZ ZZZ End of list for modification. 

A maximum of 47 sub-control function words (OPR, ADR, or FULL WORD) 
may ba oporated on at any time. Both full and l/2 word controls may 
appear ii the list. 

Each sub -control sot is separated into a 10 word item and stored 
in the computer. 47 such items, not including•ZZZ ZZZ ZZZ ZZZ, may 
be used in a single list. If tho number of subcontrol functions on 
a control tapo exceeds this number tho computer will print out LAST 
ITEM USED andihe last ubcontrol function U03d will bo printed on 
the S. C. Printer. Tho control tapo is thon searched for the word 
of all n/5 e K and all intervening subcontrol words aro not used. 

The sub-control function is determined by examination of only 
tho 2nd digit in CCC. OPR, ADR, FIJL 

On manual control, each old word, block and word number, and 
substituted word i3 printed on tho S. C. Printer. If it is desired 
not to make a spooific cihngo, DEPT 9 should bo cot when approaching 
tho specific block number. Tho routine will stop aftor pointing tho 
old word,and block and word number. FORCING TRANSFER on BKPT 9 will 
causo tho routine to print SKIPPED and omit making tho specific change 
on the outpv.b tape. This option io not aval Labia from control tapo 
option, because the S. C» Printout of each change is omitted. 


VERIFY TAPE dj *ND TAPI*' n 2 V Oj 02 t r l’ t d 0 b b b b 

-" ‘ f a l 

CORRECT OUTPUT TO TAPE t. 

Tho VERIFY Routinn compares two input tapes and makes a third tape 
of corrected data. Provisions havo boon mclo to take care of duplications* 
or omissions on either tape and bo able to cot thorn back :ln stop for 
comparison,:. 

In ordor to correctly process any discrepancies which may be found 
on tho input tapes, it is assumed that the hard copy which was wed in 
tho original tape preparation is avail labln to tho operator during tho 
verify process. 

Each input tape ( 03 ) and (sp) 1 mu. 1 t contain the some number of 
bio ka (bbbb). Tho output tone (t) density is upocified by digit (d) c 
If d - 0, write at 100/in. density. If d 0 write at 20/in. density. 

Ho automatic comparison of the output tape with an input tape is 
possiblo. 

Tapes (sj) and (i>,) are rewound if (r £ . B ) * 6 or 8 and not rewound 
if - 0 . '' ~ 

Tape (t) is rewound if (r^) * 6 or 8 and not rewound if *» 0. 

Tap '3 (s-j) and (s 2 ) may not bo mounted on servo minus (-) because 
Conditional Transfer Breakpoints, corresponding to the servo numbers 
si and s 2 are used when discrepancies are found. To eliminate any 
confusion during tho processing, tapes t p and So should bo mounted 
on any sei-vo number from 2 to 9° Breakpoint 1 is used for a special 
function. 


Vhonover 0 . discrepancy occurs between tapes (sp) and (S 2 ) the , 
word on tape (sp) tho block and word number (related to the destination 
in tho output block) and the word on tape (Op) will be printed on the 
S. C. Printer. The computer will stop. 

The following options arc available by FORCE TRANSFER BKPT, OPTION s 


1. Print tho last correct word on the output tape. 

Used when tho two word; arc completely different 
to determine if an or .'scion or duplication has 
occurred. BKPT 0 must remain set until a selection 
is made for subsequent operations because the routine 
will revert back to tho BKPT 0. 

2. Then- Select either one of the two input words. 
FORCING TRANSFER on the BKPT corresponding to tho 
tapo number will cause the corresponding word to 
bo selected for the output word. 

3. Or - Typo in a no w word at tho S. C. Console. 


F.T. BKPT 0 


FoT. BKPT « to th 
servo nuidber of 
tho tape desired 
for selection. 
F.T. BKPT 1 



4* Or - Seleot none. Actuate the start 
bar without forcing any UKPTS. 

The advanoing of tho input uordo for the next comparison la 
independent of the selection for the outputo Either, both or 
neither may be stepped by forcing the breakpoint or breakpoints 
associated with the tape numbers- Tho selection precedes the 
advancing of the word in computer operations. 

A complete record of all error word3, and choicos is recorded 
on the S. C, Printer. The routine will print out SELECT TAPE ( ) 
of a word choien and STEP TAPE ( ) vhon a word is advanced. If 
BKPT COMMA (,) is not used, both Breakpoints referring to (si) and 
(s 2 ) should remain sot at all tines. 

By setting BKPT COMMA (,) the computer will atop after printing 
each choice, but before tho operation is actually performed. If 
the operator has forced the wrong BKPT., it is possible to correo 1 * 
his mistake. Set the correct BKPT and replace the instruction 
currently in the Static Register by a oklp instruction. Actuation 
of the Start Bar will cause the routine to print TOT DONE and stop 
on the BKPT sot and give tho operator another chance to correct tho 
error choice. 

When omissions of cata occur on both tapes at different locations, 
it is possible to complete tho verify Bsquoneo with more v/ords than 
were originally on the two input t.ar 3 and the last output block will 
be partially filled. Under tills condition tho routine will print 
out LAST VALID WORD and the contents of the last word. It will then 
print TYPE FILL and cal] for a tjpe in o? the QUANTITY to be used to 
fill the last output blcok. VIhon the number of blocks on the output 
tape ia not the same \a the original input tapes „ the now block count 
will be printed on the So C. Printer. 

The following flow chart is provided to clarify the Breakpoint 
procedure raquired to handle errors on tapes to br verifiedo 
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E XAMPLE OF OM NIB US C ONTROL TAPE 

Thin control tapo will combine parte of two old instruction tapes, 
change n few worda and codedit tho row tope produced. It will verify 
two unitypod data tapes and odd additional data from a previous data 
tape to tho verified tape* It will act.ra.pl e the data tope, sending 
the block number and the second word of each b.loekotte to the output 
on servo 9- Block subdivides for 8 and 9 r.re depressed. Tapes are 
momitec 1 ay follows: 

Blank for Instructions { 

" " data 

Old Instruct:'out. to bo removed after 
rewind with interlock. Replace with 
tape to be verified. 

Old instructions (nc> ring) 

Old data tapo 
Control tap© (F.T. LEFT 0) 

Tapo to bo verified 
Blank for coded!t 

” !1 tape opt:' n output 

Omnibus routine 

Purpose 

Copy instructions without corections 
from servo 4 to .servo 1. Compare , rewind 
4 without interlock, reposition 1. 


01 

X31980 010005 

Copy 5 bleed.!! from servo 3 to servo 1. 

02 

020001 0900.56 

Correct 3 sueces 

sivo words begim ing 

ON 

320360 B0C3U0 

in block 1 ward 

53. Compare and write 

04 

L00152 Q00101 

tho d i screpancio 

a on nerve. 9. Rewind 

05 

000002 000000 

servo 3 with interlock, deposition 1. 

06 

000000 U00178 



07 

ZZZZZZ ZZZZZZ 



ou . 

1.01000 000000 

Copy from block 

3 word 20 througl 

09 

M00320 401006 

block 10 word 06 from sorvo 4 to 

10 

TOOOOO 0CC002 

servo 1. Tnum'or 2 words from ihe 

11 

900000 U00163 

control tapo to 

the output for servo 

12 

ENIttCO Dlil&Yv 

1. Fill tho i*oo 

t of tho block with 

13 

AOOOOO 000000 

awros. 

• 

14 

ZZZZZZ ZZZZZZ 



15 

B10G00 000014 

Road backward on 

servo 1, 14 bloc ks 

If 

R40000 000000 

Rewind sorvo 4. 



word No. W ord 

00 ?41063 010007: 


Servo Ho. 1 

n n % 

ri t? 

" " 4 

n it t 

" "6 
tt tl rj 

» » $ 

" W (J 

ft tt 



... ..-0^.1. ■ '-♦> A.-- ..iJIfc . - .4*. ■ 

- 


9' 


. L , .■.iyi&£r3f£3CM', 


'mm 


9i - . sag 

ai Jk&sW' 


• ^ . /;. j 

)•• .r 1 /).; ■'V V' • ■'v'r'V 


W 


17 

ia 

19 

20 
21 
22 

23 

24 
2^ 


W14966 

ADD500 

0PR$40 

0PR640 

FULIAW 

FFD.A1 

11U11 

JUNEA1 

ZZZZZZ 


001014 

111400 

111530 

111630 

ORDAAA 

6A1956 

111111 

6A1956 

zzzzzz 


Change all of the references to 
memory location 500 to 400. Change 
all54 and 64 orders to 53 sJJd 63 
orders. Update the tape from FEU. 
16, 1956 to .TUN"! 16, 1956 


26 H00000 000000 

27 JUMA1 6U956 

28 BASICA C0DFA1 

29 Z48000 000014 

30 V37260 000045 


CODEDIT 14 blocks on servo 4 with 
output on servo 6. 


Compare the two tapes on servos 3 and 
7 and write a verified taps on aorvo 
2. Rewind 3 and 7 but leave 2 positioned 
for additional ..Tata. 


31 Q52000 590015 

32 000000 15CD01 

33 ZZZZZZ ZZZZZZ 

34 D52060 000015 


35 F20000 000015 

36 K52060 590200 

37 000000 16AC01 


33 520500 620000 


39 S21961 020261 


Search on tape 5 for a block containing 
000000 15CD01 in word 59* Copy 15 blocks 
to tape 2 with no corrections. 

Compare 15 blocks backward on servos 
5 and 2. Rewind servo 5* 

Reposition servo 2 

Copy from tape 5 to tape 2 through 
a block containing 000000 16AC01 in 
word 59* The I.D. should bo found 
within 200 blocks. Rewind tape 5. 

Copy the lait block again and rewind 
tape 2. 

Sample the second word of each blookette 
on sarvo 2. Include the block number 
in the output which will go on tape 9» 
Rewind 2. 


40 999999 999999 


Rewind tapes 9 and 6. Stop. 


Note: Since the programmer was not sure there were 200 blocks to 
be copied from oervo 5 to servo 2 using the K function, he may 
wish to set breakpoint 5 during the K function. After S22961 090261 
prints on SCP, ha may force transfer on breakpoint 5 and ad Just, the 
block limit (261) by typing in a new control word. 


28 



































SUMMARY OF PUM -CONTROL W ORDS 

CCPT WI TH CO PR BCTIONS (X e t u i fl r t d o b b b b) 

Sub-conLnl words 

nnxxxxOOOOjry an Humber of consecutive corrections tinted under 

the sub-control word* m«»00 or 01 for a 
elnglo word correction* Consecutive corrections 
muni bo within block number Hated, 
x x x x Block number. 

y y Starting word number for nor re* linns. 

2 Z 2 Z Z Z Z Z Z 2 Z 7, End of* correctiorm. •> 


UORn CHANGER (w n t u r_r.d c b b b b) 

Sub-control words - For l/2 word operation* 

CCC OLD FEE NEW CCC 

CCC 

OLD 

FEE 


NEW 


ZZZ /.ZZ ZZZ zzz 

Sub-control worda - For full word operation. 

CCC Old) F.EF. HEW CCC FULIAW0R1WSA12 digits for full word control.. 

(>LD ( )12 digits of old word. 

, EFJ5 ( )1? digits extractor,. 

HEW ( )1? digits for new word, 

Coramrloons and substitutions cure made by 
extractor pnttorn on full word.. If all digits 
of OLD are to be compared, extractor niU3t bo 
all onos. 

ZZZ ZZZ 7” 7 End of list for modification, 

A maximum of 47 nub-control function words 
(OPR, ADR, of FULL WORT 1 ,' may be operated on 
at any time. Both fill and l/2 word controls 
may appear in the saiao list. (Each sub-control 
sot 13 separated into 10 word Items and 4.7 
such items, not Including ZZZ ZZZ ZZZ ZZZ, may 
be used in a single list. 

The sub-control function la determined by 
axnminntlor of only the 2nd digit in CCC. 

OPR, ADR, FUL. 


OPR if digits 1-3 and 7-9 (operation part 
of instruction word) Is to be examined. 

ADR if digits 4,-6 and 10-12 (address part 
of Instruction word) is to be examined. 

Three digit quantity (of operation or 
address) on which the search Is made. 
Extractor pattern used to dotomlne the 
equality ot the old pattern and the insertion 
of the NEW. If v 11 three digits iro to be 
examined EEF V 1)] 

Throe digit quantity which Is used (in 
conjunction with REE) to replace the old 
pattern 

End of list for modification. 


1 




SEARC1!, TURN COP? (Q o t 0 r n r,v v b b b b) 

-WI TH CO R KBCTlO NS 

w \i > *j • All wordr or*' searched, 

u v) i r > l On.’.y word cpoclf \<k 1 ip soarrhod. 

b t» b 1 Hnubar <1 b! kt> to be t opl id with c .* t*- r.t.looc . 

RolJow the control word >n t.hn 12 digit QUANTITY on which 
Vbv KMat i-.h 1 g raa«1»? The Aiireh in mode cn oil 12 digits* 

" • u'nUii')!i sr-oreh after 'tit.Mnl ngrooirrjr.t ol QUANTNT 
m i pam-flhed data» SET li 'J'l l, FOlr.jfi TRAfSFFR. 


JistNi, i.opy • bl>t*b In ti •; number ol blocks Co 

■v: py ntarUrg w.Nh Clin hK'tlt r jnto Ini ng t he eoar-bt* uoril, 

Fellow 'ho QV'AHTTTl u Lu •*»» sub-control words for 

coi'i with; correct. tour.. 

l‘r -ur h ► without copy - tiV'li i.o ;soro Follow the QUANTITY 

Vi l l) The next cent rt>l word 

to?/ - NO CCWJK^riONS K K » t, 0 r ( ,ro < w b b b b ) 

w hrir^iiAiicr-rTa" 

vj u > 5'7 All words ar** robed, 
w v; l 50 Only word sp< if Led is soar :t ed 

U b t 1 IJppwj limit of blocks copied while searching, 

tl bbbb 1: rt.-'.rivwj without finding tho 
search xxir-l« on appropriate printout, wilt 
occur and in'* *,poration is terminated.. 

I . lli.c .1 who control ro,-i with s 12 digit QUANTITY on 
which 11 if? a ft’ si in Btf.-iu VI,c search is made on ol.) 
u digits.. 

V-.. continue o,-ny unci licurv.t. after Initial ucraumont of 
QUART IT : mid r .arched data, f»KT BKPT l, fORCF TRANS i'He 
tkpy - To y.tid including lho block conta i.r.in£ the 
. n word, 


1.1 y KitidlF; (10 ■ 0 0 f t **J 0 V 0 0 0) 

* hiQld 1 

'b-co/itu ,.i wjnia 


y 1‘U*. »fn :i b u v.'d M 

11.K 

' WO 

3 

: 

WJ 

A >. 0 0 i, 0 0 0 n ri r. n A 

x 


( / C •'> I 0 0 0 0 U d 0 


Uoat.i'oJ. Nigi f opy. 

: tartlng II.. / nutnbur 

ft iid.lug word number within Mock. JIM > 

input servo ”,uiIk r. 

Finding bln i' number. 

1*1 at. worn in block blk copied. 
bcntioi d:lgt‘ Add.. 

Ad i m nn wordc- of ut ros to output 

x-A •' •' " " all Z*8 to output y. 

x* X " " " H the content.3 of which 

jg upWoltMeii lo' 1 he QUANTITY which directly 
follows tie cut-control word, to tl.;.* output 
F1IL to tl 1 r.n: of the current ou .un ol.. .k 
ul'ii t h* u.uf.t.lt.y spec tried by <« 



•* 


* 


TOOOOOOOnnnn 


Z Z Z Z 7. 7. Z 7 Z Z Z Z 


T Control digit •• Tranofer. 
u n n n Transfer the next nnnn words from the 
control tope or innmm.1 type in to the 
output. block and tape.. 

End cl" Line Morgw. 

Failure bo complete the Information in the 
last output block will canoe tho computer 
to print out *B1£>CK ?K v r FUIX* and aok for 
a ' /poin of the QUANTITf to be ustd ob n f ill, 

When the LINE MKIiOE control word lu specified t the 
routine aesuittcs that all JO servos on the computer are 
{ft gwroH vi)ly speaking) about to rend block 1. 

The toutIco i rmeubors the number of blocks read from 
AIX sei v<v The tapou will road in the forward or 
backward tv .rection to locate the otartlng bio <. number» 
depending r >t>» previous operation on servo t. 

.nation may bo merged fror. many input tepes to a 
il'igJ i cutpst tape. Jit restrictions a*'o placed on the 
be (lieuce id data «erqe»<i , cx pt » tho starting block 
and word r.f-.ibor mu at bo equal to or leas than the 
ending licet and word number for any single "M" 
iuu c-mtrei word Irfcmotion :>s copied with the tape 

niovira In t \o fdruarc nlrocticn 


-t J i] y l')p6 


i 










USEful Note #11 29 April 1957 

SUBJECT: Octal Card Load and Octal Dump 


CONTRIBUTOR: HO 




1. Identification 


H0SR24, OCTAL CARD LOAD 
Robert G. Tantsen, 12 Apr 57 
Holloman Air Development Center 
1103A-Service Routine 


2. Purpose 

To read any number of octal cards and store their contents 

on core or drum. 

3. Method 

a. This is a service routine with manual and program entry. 
It bootstraps itself into core, and restores core upon 
exit. 

b. Each card is handled as a unit. The words are assembled 
in temporaries and then block-transferred to their 
destination. 

c. Checks are made to assure that: 

1. The card contains the identification punch 

2. The address is punched correctly 

3. Each word is punched correctly 

d. Under all circumstances the core is completely restored, 
including 00000, which need not have an MJ. 


4. Usage 

a. Program entry is effected with the instruction 

RJ H0SR24+2, or, in abs. 37 44002 44000. 

Manual entry is done by starting at 40002. 

b. The routine exits upon finding a card without identifica¬ 
tion punch. On manual operation then PAK = 40002. 

After a successful exit (A)=0,(Q)=1. 

c. Space required (on drum) 88 cells. (HO-library:44000-44130). 

d. Error indications 

Address: A correct address must have 5 octal digits. If 
not 5, or if an 8 or 9 appears, the typewriter prints "a". 
Card is not loaded, routine exits. 

Words: Each word field on the card must have 12 octal 

digits punched, or be completely blank. If less than 
12 digits, or 8*s and 9 'b appear, typewriter prints "w". 

Card is not loaded, routine exits, computer stops with 
10-fault. If a column is double punched, the higher 
digit will be read. 

e. Input cards 

The first card must be in reading position. If the 
routine is to be used repeatedly, the individual sections 
to be loaded must be seperated by one blank card. Cards 
in each section may be in any order. Place 3 empty cards 
at end of whole card deck. 




« 


H0SR24 


f. Card Format 

Columns 1-12 first word in octal 
13-24 2nd word 
25-36 3rd word 
37-48 4th 
49-60 5th 
61-72 6th word 

73-77 insert address, 5 digits 
80 a 5» identification punch 

The address belongs to the first word, the others go 
into consecutive cells. If less than 6 words are need¬ 
ed, the fields not used must be left blank. There must 
always be a first word. Whenever a blank word field is 
detected, the information found so far is stored and 
the routine reads the next card. 

5. Restrictions 

a. Attempt to load into cells exceeding the core capacity 
will cause an SCC-fault. 

b. Cells 77000-77200B are used for image purposes and 
should not be loaded, because they will be block- 
transferred back to 00000-00200B. 

6. Coding Information 

a. Timing: Cards are processed at full Bull speed, 

120 cards/min. 

b. Status: Routine is completely checked out. 




^QSR2U 


LOC 

OP 

U-ADDR 


V-ADDR 


REMARKS 


B 


4 



HOSR24 


X 


79 



OCTAL CARD LOAD 


X 


11 



APRIL 57 


X 


35 



MEDLEY * TANTZEN 


X 





SERVICE ROUTINE W 


X 





MAN AND PROG ENTR 


MJ 



44004B 


ENTRANCE 


TP 

77000B 




RESET 000 


RJ 

44002B 


44003B 


PROGRAM EXIT 


MS 



40002B 


MANUAL EXIT 


TP 



77000B 


SAVE 0000 


TP 

44000B 




MJ TO 000 


RPB 

200B 


4401 OB 


SAVE 


TP 

1 


7700 1B 


CORE 


RPB 

117B 


START 


PULL IN 


TP 

44012 B 


START 


ROUTINE 

START 

EF 

ADDR + 

1 

M + 

4 

PR»R 

SET 

TV 

FIELD- 

1 

READ 


SET 


TV 

FIELD+ 

1 

READ+ 

1 

READ 


TV 

COUNT 


READ+ 

2 

COMMANDS 


TP 

M 


0 


ROW INDEX = 11 

READ 

ERA 

F + 

25 

fill 


READ 


ERB 



fill 


A 


ERB 



FILL 


ROW 


RPU 

3 


READ+ 

5 

MODIFY FOR 


RA 

READ 


C 


NEXT ROW 


I J 

0 


READ 


12 ROWS? NO 


TN 

A 


0 


0 = 1 


OT 

F + 

28 

A 


5 COL 80 TO A 


ZJ 

OKEY 


RESTO 


5 COL 80? YES♦NO 

OKEY 

TU 

READ+ 

4 

COUNT + 

2 

SET FOR FIELD 3 


LQ 

0 


8 


BIT 8 UP 


TP 

C + 

2 

F 


COL INDEX a 4 


RJ 

EX 


COUNT 


DECODE ADDRESS 

ADDR 

EJ 

C+ 

3 

FINE 


ADDR CORRECT? YES 


PR 

F+ 

13 

ROW* 

2 

PRINT -A- 

RESTO 

RPB 

200B 


4400 1B 


RESTORE CORE 


TP 

7 700 1B 


1 


AND EXIT 

FINE 

EF 



M+ 

4 

PR »R 


TV 

F + 

35 

DUMP + ' 

1 

SET DUMPADDR = IA 


TU 

WRONG 


DUMP 


SET DUMP WORDS 


TU 

FINE + 

4 

COUNT + 

2 

SET FOR FIELD 1 


TV 

K + 

2 

STORE 


SET STORE AT F+26 


TP 

C 


0 


SET MASK BIT = 1 


TP 

C+ 

3 

F + 

24 

WORD INDEX =* 5 

FIELD 

EJ 

c+ 

1 

F 2 


SET FIELD 2 ? YES 


TP 

M 


F 


COL INDEX = 11 

COUNT 

TP 

c+ 

4 

F + 

12 

ROW INDEX = 7 


3 






Flow Chart 


Octal Card Load 

HOSR2V 


4 - 

<>av£ 0 ( M3 -+ 0 ( am*. c^tc- I- 2.00 2w 

i 

FFpr-.r. 

E R- CrtvuU ((2^= II t<juL 


r r c«X <j/£ feldA ( 

mn -rtiuL * ( Q) 


T-LmJu 

x~ve\- 

OXs«{- 


VTOfte 


RAV6fc 


■ odd >pu>^ -rtiuL ^ ( Q ) \ 

MU- m~ 5-80? — c^£. -I 

+Uj+rfuU. 3,(5)=2*(F>4 = c^.W. - J 

R3 f^JwT-1 J I\ | *2 


UV | frU<uUf«M 

(LsU^r S <A\.JaXs -* jzr^oL V*- 

EFfr,^. £=IA y * = <?, 

<VfcL ^ujU. I, A-frA STdRF f+26 
(61) = I r /rvMih JyU' (F*Zb-)-S- *v*t4- m*J.. 

I 

■^iiLL l <Ur**}- —*—► Afci ^ulji!, 

(Fj * 1 1 * . am/»x 


(F+12)= 7 " Tvur au/lv 

MUa 4 ytU- 1 dLfrUr*, Ati PULL_ Av<r 


wit** Full, a , i ? —^ <JJL 

-:- t — 1 ( f+ 1 

♦ 

(U^vL, C4+aa*A- ^'i'^F + SU-). 

oJUL ? 6 f ) 4 

<LL^a/L c^vavL"> A, cZtctw" F + 3*+ 

>*C4- < R”3, ) 


^VvL- 


^uUL2 


Mr# - */- I 2. «L^a-A^ ^ -► MrrrA. 

A±Of<. auatL wW- ( AM^cLJ-U. *** ‘* vor 

X +1 ; J ^ R0K6 . 

- 6 A\>o-ftL; 1 jtcvu. ^ (F + 2.4-) s' ^mA- w 

IA < H4-B? < - —^ Y* 
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1. Identification H0SR14, OCTAL CARD DUMP 

Paul D. Medley, 15 April 1957 
Holloman Air Development Center 
1103A-Service Routine 

2. Purpose 

To dump the contents of any number of consecutive cells on 

octal cards. 

3. Method 

a. This is a service routine with manual and program entry. 
It bootstraps itself into core, and restores core upon 
exit, including cell 00000. 

b. The words to be dumped are transferred into temporary 
storage and punched out 6 words per card. This enables 
the Bull to operate at maximum speed. 



> e 


4. Usage 


a. Program entry is effected by: 

LOC OP U V REMARKS 

y-2 TP FA Q 

y-1 TP LA A 

y RJ H0SR14+2 H0SR14 

y+1 NORMAL RETURN 
at y+1 A and Q = 0 

b. Manual entry is effected by: 

Set first address in Q u 
Set last address in 
Start at 40003 

c. The routine exits when the region has been punched. 
For manual entry PAK = 40003, A and Q = 0. 


First addr to Q 
Last addr to A 


d. Space required (on drum) 108 cells. 
(HO-library 44131 -44327). 


e. Card format: 


Column: 1-12 

13-24 
25-36 
37-48 
39-60 
61-72 


first word in octal 
second word 
third word 
fourth word 
fifth word 
sixth word 




HOSRlU 


73-77 address, 5 digits 
80 a 5 for identification 

The address is associated with the first word, the other 
words are punched from consecutive cells. If less than 
6 words are on a card the remaining columns for words are 
left blank. A zero word is punched all zeros. 

f. Cell 00000 may be dumped. 

g. A MJ for cell 00000 i6 not required. 

h. Cards punched with this routine may be reloaded with 
HOSR24. 

i. The Bull need not be cycled before punching and the 
channels are cleared after punching. 

5. Restrictions 


a. Any attempt to dump an illegal address causes a SCC 

faulty or produces meaningless cards* 

b. Dump of A and Q is not permissable. 

c. Cells 76000B-77777B should not be dumped because they 
are used as core image. If they are dumped the cards 
have image addresses for information that was in 
00000-01777B before entry. 

6. Coding Information 

a. Timing: Cards are punched at maximum Bull speed except 

for a 1/4 sec. delay after each 128 cards. 

b. Status: This routine has been completely machine 

checked. 
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H03R2U 


LOC 

OP 

U-ADDR 


V-ADDR 


REMARKS 


LO 

0 


35 


BIT 1 RIGHT 


TU 

FILL 


PULL 


SET FIELD ADDRESS 


RA 

PULL 


M+ 

3 

ADVANCE PULL CMD 

PULL 

OT 

FILL 


A + 

3 IB 

IMAGE BIT TO A 


ZJ 

PULL + 

2 

ROW 


BIT IN ROW? YE S »N0 


SP 

F + 

35 

3 


ASSEMBLE NEXT 


AT 

F + 

12 

F + 

35 

OCTAL DIGIT 


RA 

F + 

34 

C 


COUNT 1 DIGIT 


MJ 



ROW + 

1 

JUMP 

ROW 

I J 

F+ 

12 

PULL- 

1 

8 ROWS TRIED? NO 


I J 

F 


COUNT 


ALL COLS? NO 


TP 

F + 

34 

A + 

30B 

DIGIT COUNT TO A 


ltl 



F + 

34 

CLEAR DIGIT COUNT 

EX 

RJ 

EX 


EX + 

1 

ON ADDR GO TO ADDR 


EJ 

M + 

1 

STORE 


WORD CORRECT? YES 


ZJ 

WRONG 


RANGE 


WRONG OR BLNK WORD 

STORE 

TP 

RE¬ 

35 

FILL 


STORE NEXT WORD 


RA 

STORE 


C 


ADVANCE STORE 


RA 

DUMP 


M+ 

3 

ADVANCE WORD COUNT 


I J 

F + 

24 

FIELD 


6 WORDS READ? NO 

RANGE 

TP 

DUMP + 

1 

A 


TP TO A 


TJ 

K 


DRUM 


IA UNDER 174B?YES 


RJ 

DUMP 


DUMP 


DUMP AT IA 


TJ 

K+ 

1 

DRUM 


IA UNDER 2 IB? YES 


MJ 



SET 


GO READ NEXT CARD 

DRUM 

RA 

DUMP + 

1 

M+ 

2 

IA + 7700 B 


RJ 

DUMP 


DUMP 


DUMP ON DRUM 


MJ 



SET 


GO READ NEXT CARD 

DUMP 

RPB 



FILL 


DUMP INFORMATION 


TP 

F + 

26 

FILL 


INTO MEMORY 

F 2 

TU 

START 


COUNT+ 

2 

SET FOR FIELD 2 


MJ 



FIELD+ 

1 

JUMP 

WRONG 

PR 

30000B 


PULL 


PRINT -W- 


MJ 



RESTO 


GO OUT 

K 

TP 

F+ 

26 

174B 


TEST 


TP 

F + 

26 

2 01 B 


DUMMIES 



F + 

1 

F + 

26 


C 




1 


ONE 





2 


TWO 





4 


FOUR 





5 


FIVE 





7 


SEVEN 

M 




11 







12 


TWELVE 





77000B 


FIRST IMAGE ADDR 



1 




U-MOD 


40 



5 


PR♦R CONST 

F 

RESERV 

36 


36 


135 


END 





201 9 APR 57 
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HOSRU* 


LOC 

OP 

U-ADDR 


V-ADDR 


REMARKS 


B 


15 



H0SR14 


X 


1 1 



OCTAL CARD DUMP 


X 


19 



DUMPS ALL ADDRS 


X 


42 



12 WORD P S 


X 





MEDLEY.TANTZEN 


X 





REVISED 4.57 


MJ 



44135B 


entrance 


TP 

76000B 




RESET 0 


RJ 

44133B 


44134B 


PROGRAM EXIT 


MS 



40003B 


MANUAL EXIT 


EF 



44276B 


PICK PUNCH 


TP 



7 6 0 0 0 B 


SAVE 0 


TP 

44131B 




MJ TO 0 


RPB 

1777B 


44 142 B 


SAVE CORE 


TP 

1 


760018 


1 TO 1777 B 


RPB 

110 


START 


PULL IN 


TP 

44144B 


START 


PROGRAM 

START 

TP 

0 


T 


SAVE FIRST ADDR 


ST 

Q 


A 


LA-FA 


ltl 

21 


A 


STORE 


TP 

A 


T + 

1 

WORD INDEX 


SA 

Cl 


15 


MAKE WORD COUNT 


TP 

A 


T + 

2 

SAVE WC 

SETBLK 

TU 

T 
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1 

SET CA 


TJ 
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TP 

K 


A 
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C 1400 
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= 1400 


MJ 
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1 
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AT 

K 
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TP 

C 1 777 


A 
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TJ 

T 


GO 
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RA 
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1 

C 7 6000 
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RJ 
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MAKE TRANSFER 


TP 

C2000 


A 
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ST 

T 


0 


2000-CA TO 0 


LA 

A 


57 


N1 TO AV 


AT 

tk 


BLOCK+ 

< 

l 

SET WS 


TP 

T + 

2 

A 


N TO A 


ST 

0 


A 


N-N1 = X 


SJ 

NEG 


POS 
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AT 
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BLOCK 


X TO RP 


RJ 

BLOCK 
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MAKE TRANSFER 

NEC 

TP 

TKS 


BLOCK* 

1 

RESET WS 


MJ 
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1 


GO 

RJ 

BLOCK 


BLOCK 


TRANS IF OVER 1777 


RS 
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2 

C 1400 


WC-1400 

PUNCH 

EF 



PPP 


PICK PUNCH. PUNCH 






H0SH1U 


LOC 

OP 

U-ADDR 


V-ADDR 


REMARKS 


RPV 

36 


AFT 


CLEAR 


TP 

CO 


FIELD 


IMAGE 

AFT 

TP 

Cl 


FIELD* 

31 

5 COL 80 TO IMAGE 


TP 

C400 


T + 

3 

PLACE ADDR BIT 


LO 

T 


0+ 

21 

CA TO OV 


TP 

C 4 


T + 

4 

DIGIT INDEX «4 


TU 

K 4 


K 1 


SET FLD III ADDR 


TP 

Cl 


FIELD* 

1 

SET ADDR TEST 


TP 

0 


T + 

5 

WORD TO SHIFTER 

SHIFT 

LO 

T + 

3 

35 


BIT 1 RIGHT 


LO 

T + 

5 

3 


POSIT NEXT DIG 


OT 

C7 


A 


DIGIT TO A 


AT 

K 1 


PLACE 


MAKE CMD 

PLACE 

FILL 

FILL 


FILL 


CC FILL T 3 


I J 
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4 

SHIFT 
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1 

ADDR 
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1 
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RJ 
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3 
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RS 
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3 
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2 
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36 


36 



END 






£ 


REMARKS 

WORD INDEX = 2 
POSITION WORD 
DIGIT INDEX =11 
MODIFY PICKUP 
GO MAKE IMAGE 
TEST+6 
NEG 

SWITCH+3 

BLOCK TRANS CON 

PLACE 


PPP 


PUNCHED BY WELCH 




FLOW CHART 


OCTAL CARD DUMP 
HOSRIli 


MANUAL 
ENTRY->10003 


PROGRAM l 
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START Save first addr, inake index, make word counter 
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1 

-Word counter^ lltOOb ?- 


\ 


\ 


\ 


\ 


\ 


SMALL 

TEST 


no 


Set RP N *» v/ord counter 

1 - 


yes 


Set j iP N = liiOOb 


-Current addr y 1777b ?- 


no 
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Adjust BLOCK by 76000b 

_ 


BLOCK 


Transfer from 
image 


BLOCK 


POS 


2000b - current addr = N1 
Advance working space by N1 

i 

Word counter - N1 Negative ? 

i no 

Set RP N * word counter - N1 
Set BLOCK = 2000b 

Jl. 


yes 


|BLOCK 


Get rest of words 
from 2000b up 


"Reset working space 
Word counter - lliOOb^- 
n ick punch, punch 


PUNCL _ 

Clear image, 5 col 80 and addr to image 
PICKUF | _ > Next word to image 
■wLast word ? 
ses 


no 


y 

N f 


Set exit switch, jump to punch card 
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ne 


WRITE 

SWITCH 


Card full ? 

i 7 *' 

Punch a card 


Manual 


EXIT 

— 


no 


-All words ? 


!y ( 


es 


Clear A and Q, restore core, jump to exit— 
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. 1 

—Region done ? 

|yes 
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\ 
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FILL 
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TP 
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Program 
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SUBJECT: Parity Error Routine 
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Useful Note No. 


1. Identification H0SP11, PARITY ERROR ROUTINE 

Robert G. Tantven, 11 June 1957 
Holloman Air Development Center 
1103A Service Routine 

2. Purpose * 

To recover from parity errors when reading magnetic tape,in 
fixed block mode, without computer stop. 

3. Method 

T is is a service routine with program entry only. It can 
handle all cases where reading is done wit! a 120 times 
repeated ERB. So the main program may read forward or 
backward, free run or one block only. Re-reading is tried 
first on high, then on 1 >w bias. If one or the other attempt 
was successful main program continues, the bias being reset 
to normal. 

4. Usage 

To use this routine, a calling sequence of three commands 
has to be inserted in the .ain program; this is two more 
than needed normally. A topical main program with calling 
sequence is given: 


LOC 

-- - 

OP 

U 

V 

REMARKS 

KICK 

EF 

* 

• 

0 

K 

Start read 

• 


RPV 

120 

READ+1 


READ 

ERB 

0 

XXX 

Read 1 block 


ERA 

0 

A 



ZJ 

BAD 

GOOD 

Parity error? yes, no 

BAD 

TP 

KICK 

H0SP11+3 

Place c ntrols 


TP 

READ 

H03P11+4 



RJ 

H0SP11+2 

H0SP11 

Go to pari ty error routine 

GOOD 




Block read correctly 


If both attemps to re-read are unsuccessful, typewriter 
prints P TUX, where X is the tape unit number. The 
computer comes to a PS stop. 





5. Restrictions 

a. Main program ca not use cells 07773-07777, and 77702- 

77777 (inia^e) 

b. Contents of Q is preserved, the main pr..- ra l nay not 
re-d tape information into Q- 

c. Space needed in drum library = 62 cells. (110-library 

43610 - 43705 ) 
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Row Chart 


HOSP11 - 

Parity E rror Routine 


Tom main 


ENT 


SET 


READ 


UNIT 


Save core 7702-77 77 at7770 2 - 77777 

Pall in routine 

Restore control cells on dram 
Set bias high, place READ- Cmd. 

Pick and save EF*constant from mam progr. 
Reading free ? 

Set EXIT to give no final EF 
Place exit address 
Save (Q) 

Make move and read constants 
Move tape I block, 35 ms delay 
Read l block and Stop 

Parity error?-► 600D Re 

| yes Re 

Set bias low, 35 ms delay Sel 

Was this first attempt 7 35 

Print P TU on typewriter EXIT jar 

Make print cmd 
Print TU ' number 
Restore core 7702*777 7 
Program Stop. 


Restore Q 

Restore core 7702*7772 
Set bias normal 
35 ms delay 

jump oat /give original E F 
I ' jump out 


back to mam program 
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Dead Space Storage Map 



2.0 

Magnetic Tape Bootstrap (variable block) 

hoooo 

0021*0 
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Paper Tape Bootstrap 

1*0001 

00006 

1*.0 

Paper Tape Read 

1*0002 

00011 

5.0 

Floxowriter Dump (octal instructions) 

1*0003 

00020 

6.0 

Marnetic Tape Dump (octal instructions) 

1*0001* 

00051 

7.0 

Q Register To Memory 

l*ooo5 

00001 

8.0 

Menory To Q Register 
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1*qoo6 

00001 

9.0 

Set Memory To Zero 

1*0007 

1*0000 

10.0 

Rewind Magnetic Tape 

llOOlO 

1*0025 

11.0 

Restore FI 

1*0011 

00000 

12.0 

Block Transfer 

1*0012 

00002 

13.0 

Paper Tape Punch (bi-octal) 

1*0011* 

00006 

lii.O 

Magnetic Tape Bootstrap (fixed block) 

1*0016 

00116 

15.0 

Tape To Tape Conversion 

1*0020 

00100 
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OOF I Nr, 1103A PER VIOF ROUTINE LIBRARY 
GENERAL DESCRIPTION 


During the course of program checkout the programmer often has need of 
information which is not normally supplied as a direct result of the 
operation of the program. The information required may bo in a variety of 
forms and include such items as octal instructions, intermediate results in 
floating or stated point, contents of registers, or statements in English. 

It is expected that the programmers will provide for all foreseeable 
difficulties by programming linkages to standard subroutines to provide the 
required information. The diagnostic can be used in this fashion to provide 
listings of instructions in octal or direct statements regarding difficulties 
encountered. Output subroutines can be used to provide listings of inter¬ 
mediate results. 

Because of the extremely large number of contingencies which might arise it 
is often impractical (if not impossible) for the programmer to provide for 
all such. This is particularly true of machine malfunctions. This Service 
Routine Library is made available to provide for such contingencies. 

Included herein are the service routines most often required to provide the 
programmer with the information necessary to diagnose his difficulty and to 
assist the operator in the diagnosis of machine malfunctions. It should be 
noted that most of these routines are a simple rework of pre-existing 
routinos to fit on the dead space of the Boeing 1103A computer. The 
routines were adapted from the Central Ejcchnn>*e Newsletters published by 
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Rer;in* T ton Rand or wore taken fron the customer engineers service routine 
library. Any or all of the service routines nay be used by the programmer 
nroviied the operator is riven a written set of instructions describing the 
routine to be used and how it is to be used. 


The routines included in the library are packed with a I* word interlace on 
the dead sr*ace of the 'Irum where they cannot be inadvertently destroyed, 
because of the limited space available the outimt of the routines is of the 
simplest form (octal instructions) and checking is kept to a minimum. 

Except as otherwise noted the routines are written to operate in the first 
part, of core which is normally reserved for bootstrapping operations, the 
diagnostic and the tape read or write subprogram. The general orocedure 
to initiate the use of a particular service routine is as follows: 

1. bet Prum to ABM( RMAL. 

?. bet 'ftK equal to entry point of desired routine. 

1. tress START key. Computer will stop at location which indicates 
successful transfer into core (or successful execution of the 
routine in the case of a routine which operates from the dead 
space!. 

Ii. bet 'rum to ’•( P'-iAL. 

5. Enter parameters on console. 


6. Turn on auxiliary equipment required (if any). 

7. Press START key. 
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BOEING 1103A SERVICE ROUTINE LIBRARY 


GENERAL DESCRIPTION 


A map of the drum dead space can be found on pape 1.0. The remainder of the 
document contains a complete description of each service routine and its 
computer code in octal. 
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MAGNETIC TAPE BOOTSTRAP (VARIABLE BLOCK) 


PURPOSEi Read the first block from magnetic tape on sorvo number 1 into 
magnetic core begihning with location g(OO?l*0). 


ENTRY: 

1. Set Drum to ABNORMAL. 

2. Set PAK - 1*0000. 

3. Turn Unieervo it\ on. 

1*. Press START key. Computer will stop with PAK ■ 0021*0. 

5. Set Drum to NORMAL. 

6. Press START key to proceed. 

STORAGE ASSIGNMENT: 

1. This routine occupies "dead space" locations 1*2000 thru 1*2017 and 
51*01*0 thru 51*01*7. 

2. This routine works from MC locations 00000 thru 0001*1*. 


LIMITATIONS: 

1. This routine assumes that the first block on magnetic tape was 
written in the variable block mode with an 18 bit chock sum as the 
last word of the block. 

2. This routine does not chock for parity errors. 
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MAGNETIC TAPE BOOTS TRAP (VARIABLE BLOCK) 


COMPUTER STOPS: 

In the event that the reading of information from tat« is incorrect 
as indicated by a check sum failure, this routine will attempt to 
re-read the information at hiph and low bias. In the event that the 
rendinr still fails to check the comjmter will stop with PAK « 00?hO 
and MCT » 00031:. In addition, the "low bias" status will be indicated. 
To ipnoro the chock sum failure, set Drum to NORMAL and press the START 
key. To try readinp afain do a MASTER CLEAR and press the START key. 

A successful readinp of information from tape is indicated by the 
computer stopped with PAK « 002hO and MOT - 00035. 
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40000 45 OOOOO 42000 


42000 17 OOOOO 42047 

42001 75 30045 00003 

42002 11 42003 OOOOO 

42003 45 OOOOO 00003 

42004 45 OCOOO 00002 

42005 37 OOOOO OOOOO 

42006 17 OOOOO 00043 

42007 23 00045 00045 

42010 16 00035 00014 

42011 76 OOOOO 32000 

42012 47 00010 00015 

42015 43 00056 00013 

42014 43 00037 00025 

42015 45 OOOOO 00032 

42016 76 10000 31000 

42017 11 31000 00240 

42020 11 31000 00047 

42021 51 00040 52000 

42022 55 31000 31022 

42023 52 00040 32000 

42024 22 10000 00046 

42025 55 00043 00045 

42026 21 00014 00056 

42027 45 OOOOO 00006 
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42030 17 00000 00041 

42031 31 00043 0"000 

42032 34 0004'-- 00000 

42033 ^3 00047 00035 

42034 45 00000 00033 

42035 17 00000 00041 

42036 17 00000 00042 

42037 37 00034 54040 

42040 56 00000 00240 

42041 00 00000 00001 

42042 00 000O0 -00002 

42043 'Xi 000 >7 77777 

42044 02 00600 00000 

42045 0? 00014 10001 

42046 02 00062 lOOOO 

42047 02 00200 10000 

54040 17 00000 54046 

54041 37 00034 00003 

54042 17 00000 42007 

51+045 37 00054 00003 
51+044 56 00000 00240 

54045 02 00062 10000 

54046 -02 OOOOl 60000 

54047 02 OOOOl 70000 











PAPER TA T, F BOOTSTRAP 


PURPOSE: Read a bi-octal paper ta:)e into the addressable memory. 
ENTRY: 

1. Set Drum to ABNORMAL. 

2. Set PAK - hOOOl. 

* 3. Press START key. Computer will stop with PAK - 00006. 

Ii. Set Drum to NORMAL. 

5. Turn on Ferranti Reader. 

6 . Press START key. 


STORAGE ASSIGNMENT: 

1 . This routine occupies "dead space" locations 7^000 thru 76ohh. 

2. This routine works from MC locations 00000 thru OOOljl. 

LIMITATIONS: 

1. Information cannot be read from paper tRpe into MC locations 00000 
thru OOOUl. 

2. The following information must be punched in the tape in the order 
indicated. 

a. Single seventh lovol punch. 

b. Insert address (six frames with seventh level punch on third 
and sixth frames. 
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PAPER TAPE B(OTPTRAP 


LIMITATIONS: (contd.) 

c. Bi-octal computer words (six frames each with seventh level 
punch on sixth frame only - routine assumes frame immediately 
preceding first frame of word, i.e., last frame of nreceding 
word, contained a seventh level punch). 

d. Optional check address (a computer word with seventh level 
punch on fourth and sixth frames whose value is equal to the 
insert address plus the number of words read). 

3. This propram does not recognize the double seventh level punches 
used to indicate an end of tape and will continue to read tape 
until a FORCE STOP is executed from the console. 

U. The reading of information destined for magnetic core only can be 
accelerated slightly by setting switch !'.J3 which suppresses the 
Ferranti stop a:fter every sixth frame. 


COMPUTER STOPS: 

A check address failure is indicated by the exocution of a PROGRAM 
STOP(57) command. 
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40001 

i +5 00000 76000 


76000 

75 5001+2 76002 


76001 

11 76005 00000 


76002 

56 00000 00006 


76005 

45 00000 76002 


7600U 

45 50000 00005 


76005 

17 00000 00040 


76006 

11 00055 40000 


76007 

21 00005 00057 


76010 

45 50000 00007 


76011 

17 00000 0004I 


70012 

76 00000 51000 


76015 

51 00055 00006 


76011+ 

52 00027 00055 


76015 

51 00056 00001 


76016 

52 00050 51000 


76017 

51 00050 00056 


76020 

45 00052 00001 


76021 

45 00051 00021 


76022 

45 00055 00025 


76025 

45 00000 00007 


7602U 

16 00055 00005 


76025 

45 00000 00007 


76026 

11 00005 52000 


76027 

56 00054 52000 
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76050 

45 

00055 

00007 

76051 

57 

07070 

70707 

76052 

00 

00000 

00077 

76055 

00 

00000 

17700 

76054 

00 

00000 

11100 

76055 

00 

00000 

10100 

76056 

00 

00000 

0 

0 

8 

76057 

11 

8 

0 

00000 

76040 

00 

00000 

00000 

76041 

00 

00000 

00000 

76042 

00 

00000 

00001 

76045 

10 

00001 

00000 

76044 

10 

00002 

00000 
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” R"r. : Road a bi-octal pa;)er tape into the addressable memory. 


-ITIt Y: 


1. Lot Drum to A WF: W AL. 

2. Let RAK = hOOn?. 

3. i'ross 3TART key. Computer will '-top . r ith AK - 00^11, 
A. Let ' ; rum to N'RIAAI . 

c . Turn on Ferranti Reader. 

6. Turn on Flexowriter. 

7. Press .'"TART key. 


' ,TV ryi.' • 7 'MT*. 

1. This routine occupies "dead space" locations 1/000 thru 1/01*6 
720^0 thru 72T?7 and 71:000 thru. 71031. 

2. This routine works from core locations 00000 thru 00137 and uses 
locations OOliiO thru 01777 as erasable storape. 


.IMITATIONS: 


1. Information cannot be read from paper tape into MC locations 00000 


thru 01777. 


2. The following information must be punched in the tat>e in the order 


indicated. 


a. Single seventh level punch. 

b. Insert Address (six frames with seventh i evel punch on third 


and sixth frames'! 
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?;,r'iK TA'-r 

LE r ' :if : (c^ntd. ^ 

c. di-octnl coniiuter words (six frames each with seventh level 
punch on sixth franc only - routine assumes frame immediately 
precedinr first frame of vrord, i.o., last frame of preceding 
word, contained a seventh, level ininch). 

d. Optional check address (a computer word with seventh level 
punches on fourth and sixth frames whose value is eoual to 
the insert address plus the number of words read'. 

e. ;nd of tape (? seventh levrl ;>unches in svccessivc frames) 
following the last block on the tape. 

3. * check sum may be used to check the readinp of information. The 

check sum is formed by performing a repeated CA command and 
consists of two computer words. In the paper tape it must be 
preceded by an insert address of p(0^272) and followed by a check 
address of g(0027ti). V.'here used it must be punc-ed following the 
block of information and preceding the insert address for the 
next block. 

h. A block of information punched ir. a tape without a check sum 

cannot bo followed by a block for which a check sum is supplied. 
Each check sum encountered is used to check the readinp of all 
information followinp the last check sum encountered or the 
beginninp of the tape. 
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1'Ai‘KR TAI’K T ’.A!/ 


CPi.;:";TO STO"S: 


1. A chock address failure is indicated by the letter "C" tyoed on 
the flexowritcr and PAX ■= OOOli 0 . To resume reading, press l TART 
key. To reread tape, net !'AK «• 00^11 . 

?. A check sun failure is indicated by the letter "M" typed on tho 
flexowriter and PAX - 00011. Press START key to resume rending 
or reread tape. 

3 . An end of tape is indicated by a com outer stop with PAX «■ b^OOO. 
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1*0002 14-5 00000 1+6000 


1*6000 75 5001+0 1+6002 
1+6001 11 1+6007 ooooo 
1+6002 75 5001+0 1 + 600 U 
1+6005 H 72000 00040 
1 + 6001 + 75 50052 U 6 OO 6 

1+6005 11 7 *+ 0 O 0 00100 
1*6006 56 OOOOO 00011 
1*6007 1*5 ooooo 1*6002 
1*6010 00 ooooo ooooo 
1*6011 00 ooooo ooooo 

1*6012 10 00002 OOOOO 

46015 10 00001 OOOOO 

46014 45 10000 00267 

46015 45 ooooo 00011 

46016 16 00174 00025 

46017 16 00175 000o4 

46020 25 00151 00151 

46021 25 00152 00152 

46022 11 00112 00055 
46025 17 OOOOO 00005 

46024 76 OOOOO 51001 

46025 51 00155 00006 

46026 52 0G115 00155 

46027 51 00114 00001 
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72012 

56 00000 00011 

7201 J 

11 00133 00300 

72014 

21 00053 00124 

72015 

31 00131 00044 

72016 

32 00132 00000 

72017 

32 00133 00000 

72020 

11 52000 00132 

72021 

22 00000 00131 

72022 

11 00062 00062 

72023 

11 00053 32000 

72024 

43 00125 00066 

72025 

45 00000 00015 

72026 

17 00000 00004 

72027 

31 00053 ooooo 

72030 

34 00112 00017 

72031 

35 00126 00075 

72032 

11 00115 32000 

72033 

42 00127 00103 

72034 

16 32000 00076 

72035 

75 30000 00077 

72036 

11 00300 00000 

72037 

11 00114 32000 

74000 

43 00117 00105 

74001 

• 1 

43 00120 00107 









74002 56 00000 45000 
74005 21 52000 00150 

74004 45 00000 00074 

74005 21 00115 00111 

74006 45 00400 00015 

74007 16 00153 00115 

74010 45 00000 00013 

74011 00 00000 01500 

74012 11 00133 00300 

74013 00 00000 00077 

74014 00 00000 00000 

74015 00 00000 00000 

74016 00 00000 17700 

74017 00 00000 10100 

74020 00 00000 11100 

74021 00 00000 10500 

74022 00 00000 00500 

74023 00 00000 00274 

74024 00 00000 00001 

74025 11 00133 02000 

74026 75 30000 00077 

74027 00 00000 02000 

74030 00 00000 00000 

74031 00 00000 00000 















FLEXCVRITCP. HUMP 


PURPOSE* Print small blocks of instructions from tho addressable memory 
in octal on the flexowritor. Since this is a relatively slow 
process, dumpinp with this program should be restricted to few 
instructions. In general, blocks of 8 instructions or more should 
be dumped with the octal dump (see next routine). 

i 

ENTRY: 

1, Set Drum to ABNORMAL. 

2, Sot PAK - 10003. 

3, Press START key. Computer will stop with PAK - 00020. 

b. Set Drum to NORMAL. 

5, Set location of first instruction to print in u-address of 0. and 
number of instructions to print in v-address of C. 

6, Turn flexowritor on. 

7, Press START key. 

: • 

STORAGE ASSIGNMENT: 

1. This routine occupies "dead space" locations b00b2, b00b3 and 
70000 thru 700U7* 

2. This routine works from core locations 00000 thru 000b7• 

LIMITATIONS: 

This routino will not print more than 3(1000) • ^(512) words. 













40003 45 00000 40042 


40042 75 30050 00047 

40045 11 70000 00000 


70000 45 00000 00047 

70001 00 00000 00004 

70002 00 00001 00001 

70003 00 00000 00007 

70004 00 OOOOO 00045 

70005 00 OOOOO 00057 

70006 00 OOOOO 00037 

70007 00 OOOOO 00052 

70010 00 OOOOO 00074 

70011 00 OOOOO 00070 

70012 00 OOOOO 00064 

70013 00 OOOOO 00062 

70014 00 OOOOO 00066 

70015 00 00000 00072 

70016 61 OOOOO 00006 

70017 00 OOOOO OOOOO 

70020 15 31000 00027 

70021 16 31000 00017 

70022 61 00000 00005 

70023 45 OOOOO 00044 


caic ID. Cook 
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70024 

55 

00027 

51006 

70025 

57 

00041 

00052 

70026 

61 

00000 

00001 

70027 

n 

00000 

31000 

70030 

16 

00002 

00050 

70031 

57 

00041 

00033 

70032 

11 

00001 

00050 

70033 

61 

00000 

00001 

70034 

55 

51000 

00003 

70035 

51 

00005 

32000 

70036 

55 

00016 

00037 

70037 

61 

00000 

00006 

70040 

4l 

00050 

00034 

70041 

57 

00041 

00042 

70042 

57 

00041 

00032 

70043 

21 

00027 

00002 

70044 

61 

00000 

00004 

70045 

61 

00000 

00004 

70046 

41 

00017 

00024 

70047 

56 

00000 

00020 
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MAGNETIC TAPE DUMP 


p'ppor 


'rite instructions on maimetic taoe in a form suitable for printing 


in octal on the High Speed Printer, Each pare of Instructions to 
be printed is oreceded by a heading containinr a fast feed symbol 
and a blank lino. The instructions are printed 6 fwr line and 
08 linos per page. A blank line containing a printer stop code 
follows the last instruction to print. 


ENTRY: 


1. Set Drum to ABNORMAL. 

2. Set PAK - liOOOli. 

3. Press START key. Computer will stop with PAK * 00001. 

1*. Set Drum to NORMAL. 

0. Set location of first instruction to prir.-t in u-address of Q and 
number of instructions to print in v-address of Q. 

6 . Turn Uniservo f 2 on. 

7. Press START key. 


STORAGE ASSIGNMENT: 

1. This routine occupies "dead apace" locations 06000 thru 060^0, 
0UOOO tlru 01:037 and 66000 t'nru 66017. 

2. This routine works from MC locations 00000 thru 00210. 


LIMITATIONS: 

The magnetic tape is written in variable block form one blockette 


of 20 words per recor 


ksvuto oat* 
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40004 45 00000 56000 


56000 75 50040 56000 

56001 11 56007, 00050 

56002 75 50040 56004 

56005 11 54000 00110 

56004 75 50020 00140 

56005 11 66000 0015C 

56006 00 00000 00000 

56007 11 51000 00050 
56010 15 O0050 00102 
56 OH 11 00141 00157 
56012 16 00050 00157 
56015 41 00157 00057 

56014 45 00000 00155 

56015 17 00000 00155 

56016 11 '00145 OOlbO 

56017 77 10000 00150 

56020 75 10005 00064 

56021 77 10000 00151 

56022 41 00160 00062 

56025 45 00000 00164 

56024 17 00000 00155 

5'025 75 00074 00071 

56026 77 10000 00141 

56027 11 00147 70161 
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56030 17 00000 00156 

56031 16 00075 00114 

56032 75 10024 00076 

56033 11 00141 00172 

56034 55 00102 31006 

56035 11 31000 00170 

56036 37 00116 00105 

56037 11 00145 00160 

56040 11 30000 00170 

56041 11 00143 00162 

56042 57 00116 00106 

56045 11 00163 00162 

56044 11 00141 00171 

56045 55 00170 00003 


54000 31 00171 00006 

54001 52 00146 52000 

54002 35 00144 00171 

54003 41 00162 00107 

54004 11 00171 30000 

54005 21 00114 00143 

54006 37 00116 00117 

54007 37 00116 00105 

54010 21 00102 00142 

54011 41 00160 00123 
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54012 45 00000 00124 

54013 41 00157 00102 

54014 17 00000 00155 

54015 75 10024 00127 

54016 77 10000 00172 

54017 17 00000 00156 

54020 41 00161 00132 

54021 45 ooooo 00055 

54022 41 00157 00073 

54023 17 ooooo 00155 

54024 75 00024 00136 

54025 77 10000 00154 

54026 17 ooooo 00156 

54027 37 00137 00140 

54030 56 ooooo 00051 

54031 00 ooooo ooooo 

54032 00 00001 ooooo 

54033 00 ooooo 00001 

54034 00 ooooo 00003 

54035 00 ooooo 00005 

54036 00 ooooo 00007 

54037 00 ooooo 00071 


66000 37 00465 12600 

66001 00 ooooo 05152 
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66002 

00 

00006 

70000 

66003. 

00 

00007 

'00000 

66004 

60 

00000 

00000 

66005 

02 

00066 

20000 

(S 6006 

02 

00600 

20000 

66007 

00 

00000 

00000 

66010 

00 

00000 

00000 

66011 

00 

00000 

00000 

66012 

00 

00000 

00000 

66013 

00 

00000 

00004 

66014 

77 

10000 

00141 

66015 

17 

o 

I 

00150 

66016 

^5 

00000 

00066 

66017 

00 

00000 

00000 
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PrniFTKR TO MKMCR Y 


PURPOSE; Transfer a word iYom the Q register to the addressable menory. 

Foil owl np the successful transfer, the word is displayed In the 
accumulator for checking. 


ENTRY: 


1. Get Drum to A13 NORMA] . 

?. Get Vfa = UOOO 1 ;. 

3. Press START key. Computer will stop with PAK » 00001 . 

I. Set Drum to NORMAL. 

5. Set location to store? word in u-addre 3 s and v-address of A right. 

6 . Enter word to store in Q register. 

7. Press START key. 

8 . Word transferred will appear in A for checking. 


STORAGE AS.' TOHMENT: 

1. This routine occupies "dead soace" locations U 0030 tiiru 1|0037. 

2. 'Ibis routine works from MC locations OOOOO thru 10005. 


TIKI TAT JONG: None 
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1*0005 *5 00000 1*0030 


1*0030 75 50006 00005 
1*0031 n 40032 00000 
1*0032 45 00000 00005 

40033 16 32000 00003 

40034 15 32000 00004 

40035 11 31000 00000 

40036 n 00000 32000 

40037 56 00000 00001 
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MEMORY TO Q REGISTER 


PURPOSE: Display a word in the addressable memory for visual inspection. 
The word to be displayed will appear in the Q register. 

ENTRY: 

1. bet Drum to ABNORMAL. 

2. Set PAK « UOOn6. 

3. Press START key. Computer will stop with PAK = OOOOl. 
li. Set Drum to NORMAL. 

5. Set location of word to be displayed in the u-aidress of A right. 

6. Press START key. 

7. Word to be displayed will appear in the register. 

STORAGE ASSIGNMENT: 

1, This routine occupies "dead s;>ace" locations liOOliO, LiOOUl and 
720UIi thru 720L7. 

2. This routine works from NIC locations OOOOO thru 00003. 
















40006 45 00000 40040 


40040 75 50004 00005 

40041 U 72044 00000 


72044 45 00000 00005 

72045 15 52000 00002 

72046 11 00000 51000 

72047 56 00000 00001 
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SET MEMORY TO 7KUO 


PURPOSE: Set all of magnetic core memory to zero. This routine works from 
the drum doad space. 


ENTRY: 


1. Set Drum to ABNORMAL. 

2. Set PAK - U0007. 

3. Press START key. After clearing all of core memory, computer will 
stop with PAK » hOOOO. 


S TOR A HE ASSTONMFJNT: 

This routine occupies "doad space" locations 600hh thru 6ooh7 and 
works tYom these locations. 


LIMITATIONS: 

1. This routine assumes El (location OOOOO) contains a Manual Jump 
command prior to entering. 

2. FI is set to zero by this routine and must bo restored before 
proceeding. 
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1*0007 45 00000 60044 

60044 75 57777 60046 

60045 23 00001 00001 

60046 23 00000 00000 

60047 56 00000 40000 
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REWIND MAGNETIC TAPE. 


PURPOSE: Rewind a napnetic tape from the console. This routine works 
from the drum dead space. 


ENTRY: 


1. Get Drum to ABNORMAL. 

2. Get PAK = UnrVLo. 

3. tYess START key. Computer will stop with PAK = 1 4 ;y ' 2 £ and (".) 
02 00200 OOOOo. 

1. inter number of servo to be rewound in thru 
Press START key to rewind tape. 


STORAGE ACSTOIJMENT: 

This routine occupies "dead space" locations 1002 3 thru h“>027 and 
works from these locations. 


LIMITATIONS: 

Tne servo number entered in .. must be one of the lorically assigned 
servos and must be ready. 


COMPUTER STOPS: None. 
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1*0010 1+5 00000 1+0026 


02 00200 00000 
.17 00000 51000 
11 1+0024 51000 
56 00000 1+0025 
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pi ; R.i v 'F: Restore the contents of Fl •,location ''DvyO to a Manual Jump 
command. The v-aliress portion of Fl. wil] not be altered. 


ENTRY: 


1. Set Drum to i-lAl. 

?. let =• UDD11. 

3. "Yess GTAk? key. Computer will, r too with ■ AK - OO-Oon. 
oririnal contents of Fl will be dis-layed in 

L. w-et ' rum to \’< RMAi,. 

c j. Dress ^'!7i\T key to transfer to rl and continue. 


G TOR AG?; amioekfnt: 

This routine occupies "dead space" locations 1;0 ojj^ th.ru hOOL7 and 
works from these locations. 


LIMITATION: None. 


COM^ThR fTOPS: None. 
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40011 45 00000 40044 


40044 11 00000 51000 

40045 11 40000 00000 

40046 16 51000 00000 

40047 56 00000 00000 
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31.1-CK TRANSFER 

PURPOSE: Transfer a block of consecutive words from one location to another 
within the addressable memory of the computer. 


ENTRY: 


1 . Set Drum to ABNORMAL. 

?. Set PAN - 1:0012. 

3. Press START key. Computer will stop with PAY *= 00002 . 
li. Set Erum to NORMAL. 

5. Set present starting address of block to be transferred in 
ii-address of (*. 

6 . Set desired starting location of block in v-address of Q. 

7. Set number of words to be transferred in u-address of A. 

8. Press START key. 


STORAGE ASSIGNMENT: 


1. This routine occupies "dead space" locations 7boliO thru 7ltOli7. 

2. This routine works from core locations 00000 thru 00005. 

LIMITATIONS: 

All words to be transferred must be contained within the addressable 
memory both before and after transferring. 

COMPUTE STOPS: None. 
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40012 

75 

30010 00006 

40013 

11 

74040 00000 

74040 

45 

00000 00007 

74041 

75 

30000 00007 

74042 

35 

00001 00005 

74043 

15 

31000 00006 

74044 

16 

31000 00006 

74045 

75 

30000 00007 

74046 

11 

00000 00000 

74047 

56 

00000 00002 


yj 
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F"RPOSE: Punch a block of addressable nenory into paner taue in bi-octal 
form. Insert and check addresses and a check sum are provided 
automatically but nay bo suppressed at the narrator's option. 


ENTRY: 

1. Set Hrum to AfJi P 'AL. 

2. Set PA Y - h^Olli. 

3. ’dress S'll.’.T key. Computer will stop with r'" - f YYY t /. 

U. Set Prum to V REAI . 

5. Enter location of first word to puncr; in the u-a’dress of ^ and 
the number of words to be punched in t ie v-ad truss of 

6. Set /iJl to suporess punching of insert and check a hlresses and 
check sum. 

7. Set y.J? to suppress punching c.aock sum only. 

6. Turn high s;>eed punch on. 

9, i’ress START key. 


STORAGE ASSIGNMENT 

1. This routine occupies "dead s^ce" locations Avvvpo tliru 600.1,3 and 
66020 thru 66 o]. 6 . 

2. This routine works from core locations OOOO n tiiru 000^0 and uses 
locations 00?72 and op273 as erasable storage for the check sum. 


I.::STATIONS: :Jone 
CO:PUTV. ,' TO PS : None 


— 
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Cook 
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CHECK 
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40014 

45 

00000 

60000 

60000 

75 

30040 

60002 

60001 

11 

60004 

00000 

60002 

75 

30026 

00065 

60003 

11 

66020 

00040 

60004 

45 

00000 

60002 

60005 

00 

00000 

77777 

60006 

00 

00000 

00000 

60007 

00 

00000 

00000 

60010 

00 

00272 

00002 

60011 

75 

20000 

00060 

60012 

75 

20100 

00010 

60013 

63 

47701 

00003 

60014 

45 

10000 

00021 

60015 

75 

20003 

00013 

60016 

63 

47776 

00003 

60017 

51 

31000 

00055 

60020 

63 

00000 

32000 

60021 

54 

32000 

00006 

60022 

63 

00000 

32000 

60023 

54 

32000 

00006 

60024 

63 

10000 

32000 

60025 

16 

31000 

00002 

60026 

31 

00002 

00017 

60027 

35 

00005 

00056 
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60030 

15 

31000 

00057 

60031 

45 

00000 

00041 

60032 

15 

31000 

00027 

60033 

31 

00000 

00052 

60034 

63 

00000 

32000 

60055 

5^ 

32000 

00006 

60036 

37 

00032 

00033 

60037 

37 

00032 

00030 

60040 

37 

1 

ro 

00030 

60041 

37 

00032 

00030 

60042 

37 

00032 

00030 

60043 

63 

10000 

32000 

66020 

21 

31000 

00001 

66021 

4l 

00002 

00026 

66022 

45 

10000 

00064 

66023 

75 

00003 

00045 

66024 

63 

00000 

00003 

66025 

31 

31000 

00055 

66026 

63 

10000 

32000 

66027 

5^ 

32000 

00006 

66030 

63 

00000 

32000 

66031 

5^ 

32000 

00006 

66032 

63 

10000 

32000 

66033 

37 

00053 

00054 
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66054 

45 

20000 

<2 

0 

8 

66055 

51 

00005 

00000 

66056 

75 

20000 

00060 

66057 

52 

00000 

00000 

66040 

22 

00000 

00272 

66041 

22 

10000 

00275 

66042 

11 

00004 

51000 

66045 

57 

00055 

00011 

66044 

57 

00064 

00065 

66045 

56 

00000 

00006 

66046 

00 

00400 

00000 
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riAH .T.T1C TAPE iJU TGTRAR v FIXr.D Pl/nO 


El'RPOEE: Read the first block of 120 woris iYom tape on servo v6 into MC 
locations 00001 thru c ( • ''0170). This routine works from the drum 
dead space and was desimed to bootstrap the customer engineers 
diafrnostic routines. 


ENTRY: 


1. Set Drum to A'.3N r REAL. 

2. Rewind tape or. servo number 6. 

3. bet RAY «= 1/V)1*. 

h. Press JTART key. After reading first block from tape 6 into core, 
computer will stop with RAX = 0011 r. 

5. bet Drum to K- REAL. 

6. Press bTART key to proceed. 


STORAGE Ah: IQNK-OT: 

This routine occupies "dead surco" locations 1U032 tiiru 7 i037 and 
works from these locations. 


LIMIT'TIC.NR: 

1. This routine assumes that the first block on tape f ' ’-.'as written in 
fixed block form without blockotto spaces. 

2. This routine assumes >1 v location 000TO) contains a Manual Jump (h r > 
command. If II has been destr yed, restore IT and start over. 


calc /). Cook 
Cook 
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*0016 *5 00900 7*052 


7*032 17 00000 7*037 
7*033 75 10170 7*035 
7 * 03 * 76 10000 00001 
7*035 76 00000 32000 
7*036 56 00000 00116 
7*037 02 00602 60000 
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TAPS TV TAPE C( N VERSION 


niRr’OSF : Convert a magnetic tape containing binary information to a 

magnetic tape of a form suitable for printing the information on 
the High Speed i“rinter as octal instructions. The information is 
read from the tane to be converted into magnetic core beginning 

with location (01302''. The record number is stored in location 

b ; 

g(0l000) and the number of parity errors detected in reading that 
record is stored in location g(0100l). This information is written 
on the tape on servo A2 in XS3 code with 6 words per line and one 
blank line between each record. In addition, a trail is printed 
on the flexowriter to indicate the condition of each record as 
it is read from the tape. 

ENTRY: 

1. bet 7*rum to ABNOThvAL. 

2. bet PAK - 1x0020. 

3. iress START key. Conpmtor will stop with i AK = 00100. 

)j. bet brum to Nbl'IlAL. 

L . bet the servo number (n) containing the tape to be converted in 

’'111 thru Q 12 . 

h. Turn on servos number n and number ?. 

7. Turn on flexowriter. 

h. bet [witch MJ1 to suppress rewinding tape n before conversion. 

9. Press b.T.'UT key. 
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TAP?; c. 


'■'APP 


"ve-t ir-jj 


ST FP H c : A'TGNMf'NT: 

1. This routine occupies "de^d space" locations liljhon thru ItU°U7, 
‘jOOm thru 5 v 'h7, 52hOO thru c ?^h7 , 62000 thru 620^7, and 
6) 4 000 thru 6Uol:7. 

2. This routine works from core locations QOOOO thru 0'U;23. 


LIMITATIONS: 

1. This propram will not read records from tape eontaininr more than 
nv35P2) - 01.6776) words. 

2. -ince servo 2 is used for output this propran will not convert a 
tape on servo /• 2. 


COMF1 :TER STTTS: None. 
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40020 45 00000 64000 


64000 75 50050 64002 

64001 11 44000 00000 

64002 75 50050 64004 

64005 11 50000 00050. 

64004 75 50050 64006 

64005 11 52000 00120 

64006 75 50050 64010 

64007 11 62000 00170 

64010 75 50056 00140 

64011 11 64012 00240 

44000 45 00000 64002 

44001 00 00000 00000 

44002 00 00000 00001 

44005 00 00000 00002 

44004 00 00000 00005 

44005 00 00000 00004 

44006 00 00000 00005 

44007 00 00000 00006 , 

44010 00 00000 00007 

44011 02 00200 00000 

44012 02 00062 00000 
44015 02 00600 00000 
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44014 

00 

00001 

00000 

44015 

00 

00000 

00071 

44016 

00 

00000 

00077 

44017 

00 

00000 

8 

0 

V* 

44020 

00 

00000 

07777 

44021 

00 

0 

1 

44022 

00 

00000 

00037 

44023 

00 

00000 

00052 

44024 

00 

00000 00074 

44025 

00 

00000 

00070 

44026 

00 

00000 

00064 

44027 

00 

00000 

00062 

44030 

00 

00000 

00066 

44031 

00 

00000 

00072 

44032 

00 

00000 

00001 

44033 

47 

12571 62204 

44034 

00 

00000 

00002 

44035 

04 

15301 

21401 

44036 

25 45000 00000 

44037 

00 

00000 

00001 

44040 

04 03364 50000 

44041 

00 

00000 

00002 

44042 

04 

07032 

20466 

44043 

5 

8 

8 

0 

00000 
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44044 00 00000 00005 

44045 04 20062 20405 

44046 26 04015 01520 

44 047 45 00000 00000 


50000 60 0-0000 0000c 

50001 02 00066 2 O000 

50002 00 00600 20000 

50005 00 'XX) 52 00052 

50004 00 00054 0^054 

50005 00 00-057 00057 

50006 00 00041 00041 

50007 00 00044 00044 

50010 6l OOOOO 00022 

50011 76 10000 01002 

50012 00 OOOOO OOOOO 

50C15 00 OOOOO OOOOO 

50014 00 OOOOO OOOOO 

50015 00 OOOOO OOOOO 

50016 57 00465 12600 

50017 00 0-0000 05152 

50020 00 00006 70000 

50021 00 00007 OOOOO 

50022 16 00251 00250 
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50024 

00 

00000 

ooooo 

50025 

00 

00000 

ooooo 

1 

50026 

00 

00000 

ooooo 

50027 

00 

ooooo 

ooooo 

50030 

75 

10003 

00274 

50031 

16 

31000 

00011 

50032 

17 

ooooo 

0001L 

50033 

6l 

ooooo 

00021 

50034 

11 

OOOOl 

01000 

50055 

15 

00055 

00155 

50036 

15 

00053 

00166 

50037 

37 

00170 

00155 

50040 

21 

01000 

00002 

50041 

11 

00017 

00062 

50042 

11 

01000 

31000 

50043 

55 

31000 

31003 

50044 

51 

00010 

32000 

50045 

47 00121 

00116 

50046 

41 

00062 

00113 

50047 

55 

31000 

31003 

52000 

51 

00010 

32000 

52001 

35 

00060 

00122 

52002 

6l 

ooooo 

00022 

52003 

4l 

00062 

00117 
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52004 

17 

00000 

00012 

52005 

16 

00061 

00141 

52006 

11 

00001 

01001 

52007 

76 

00000 

32000 

52010 

43 

00001 

00141 

52011 

43 

00002 

00144 

52012 

43 

00003 

00146 

52013 

43 

00004 

00172 

52016 

43 

00005 

00174 

52015 

43 

00006 

00140 

52016 

43 

00007 

00140 

52017 

43 

00010 

00140 

52020 

56 

00000 

00100 

52021 

76 

10000 

01002 

52022 

21 

00141 

00002 

52025 

45 

00000 

00127 

52024 

21 

01001 

00002 

52025 

45 

00000 

00141 

52026 

11 

01001 

32000 

52027 

47 

00150 

00152 

52030 

15 

00054 

00155 

52031 

45 

00000 

00153 

52032 

15 

00055 

00155 

52035 

17 

00000 

00013 
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52034 15 00155 00166 

52035 11 00037 00062 

52036 45 00000 00165 

52037 11 00006 00063 

52040 55 31000 31006 

52041 51 00016 32000 

52042 47 00163 00164 

52043 61 00000 31000 

52044 41 00063 00160 

52045 21 00166 00014 

52046 11 00040 31000 

52047 4l 00062 00157 

62000 37 00170 00171 

62001 45 00000 00204 

62002 15 00056 00155 

62003 45 00000 00153 

62004 15 00057 00155 

62005 37 00170 00154 

62006 17 00000 00011 

62007 17 00000 00051 

62010 75 00024 00202 

62011 77 10000 00050 
62012 17 00000 00052 
62015 56 00000 00100 
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62014 

31 

00141 

00000 

62015 

5U 

00061 

00000 

62016 

35 

00003 

00062 

62017 

15 

00110 

00236 

62020 

^5 

00000 

00264 

62021 

4l 

00062 

00213 

62022 

45 

00000 

00267 

62023 

17 

00000 

00051 

62024 

11 

00006 

OOO 63 

62025 

77 

10000 

00066 

62026 

75 

10003 

00220 

62027 

77 

10000 

00067 

62030 

4l 

00063 

00216 

62031 

77 

10000 

00001 

62032 

17 

00000 

00052 

62033 

17 

00000 

00051 

62034 

75 

00024 

00226 

62035 

77 

10000 

00001 

62036 

11 

00015 

00064 

62037 

17 

00000 

00052 

62040 

75 

10024 

00072 

62041 

11 

00001 

00400 

62042 

55 

00236 

31006 

62043 

11 

31000 

00074 
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62044 37 00252 00241 

62045 11 00006 00065 

62046 11 01000 00076 

62047 11 00002 00065 

64012 37 00252 00242 

64013 11 00005 00065 

64014 11 00001 00075 

64015 55 00074 00003 

64016 31 00075 00006 

64017 52 00010 32000 

64020 35 00006 00075 

64021 4l 00065 00243 

64022 11 00075 00400 

64023 21 00250 00002 

64024 37 00252 00253 

64025 37 00252 00241 

64026 21 00236 00014 

64027 41 00063 00257 

64030 45 00000 00260 

64031 41 00062 00236 

64032 17 00000 00051 

64033 75 10024 00263 

64034 77 10000 00400 

64035 17 00000 00052 
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64056 41 00064 00266 

\ 

64057 45 00000 00211 

64040 41 00062 00250 

64041 17 00000 00051 

64042 75 00024 00272 
64045 77 loooo 00001 

64044 17 ooooo 00052 

64045 45 00000 00105 

64046 45 10000 00105 

64047 45 OOOOO 00102 
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A MULTIPLE PRECISION FI OATTNG POINT ROUTINE 


FOR THE 

UNITAC SCIENTIFIC COMPUTER 

by 

T. C. ToIIefson 


General Descripti on 


The multiple precision floating point routine, described on 
page 1 through 4, was coded for use with the Univnc Scientific 1103A 
Computer. The coding is on pages 5 through 9 in both relative (RECO) 
and absolute addresses. 

The routine performs arithmetic operations on floating point 
numbers of the order of 62 bits by use of stated point operations. Four 
arithmetic operations are provided by the routine; they are addition, 
subtraction, multiplication and division. Any one of the four operations 
may be performed by entering into the proper subroutine by means of the 
Interpret instruction. The Interpret instruction indicates the operation 
to bo perfoimied as well as the storage locations of the two operands in¬ 
volved. 


Each of tho two operands occupies two storage cells. The capa¬ 
city of each cell or storage locution is 36 bits and therefore each oper¬ 
and is 72 bits in length. For each operand, 62 bits aro allocated for the 
mantissa M, 8 bits for the (biased) characteristic C, and 2 bits, and 
Sp, for the sign. The 72 bits are arranged as she n below. The arrange¬ 
ment is true of both the operand and the result. 


Number of Bits 



1 

8 

27 

Cell 1 

Si 

C 

. L K i . 


1 


35 

Cell 2 

S 2 ! 
_± 1- 


*2 


The higher order 27 bits (M-j) of the total 62 bits which comprise 
the mantissa are always in cell 1 and the lower order 35 bits (Kp) are al¬ 
ways in cell 2. The mantissa contained in the two cells is always normal¬ 
ized and therefore the first significant bit occurs as the left-most bit 
of the higher order 27 bits, K-j. The binary point is assumed to be immed¬ 
iately to the left of this bit (between C and M-j), 
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Any number N used by the routine must be in the form M • 2^' and 
must satisfy one of the following conditions 

(1) N = 0 or 

(2) 2“ 12 9 <|N | < 2 127 

The characteristic C is biased which allows the number N to vary 
over the values stated in (2) above. If K represents the normal exponent 
of the number, then C, the biased characteristic, is given by G = K + 128. 
The value of the mantissa M, located in M; and Vt? y may range in value as 
defined by the expression ^ < M <1, 

The sign bits S-j and S 2 must be in agreement, that is, they must 
both be either 7,ero or one. If thoy are "I’s", M is a negative number and 
C and M are'in one *’3 complement form. 

Si, 52, C, Mi and M 2 are necessarily equal to zero whenever N 
equals zero. 

The order of precision of this routine is 62 bits. The results 
are similarily 62 bits with an occasional round-off error at the 62nd bit. 

The Interpret instruction 14 OP U'V 1 is utilized to initiate any 
one of the arithmetic operations. The operation code, OF, used for any 
specific operation is analogous to the regular machine codes for standard 
stated point operations. The code for these four arithmetic operations 
is listed b( 'ow. 

Add: AT (35) 

Subtract: ST (36) 

Multiply MP (74) 

Divide: DV (7j) 

The U 1 and V* addresses refer to the first of two consecutive 
storage locations at which each operand is stored. Thus, if the first 
operand is stored at ui and u2, and the second operand at Vi and V 2 ; 

U* = ui and V 1 = v-j. 

The result of the operation performed is properly packed and 
normalized and is found in the A and Q registers. The result containing 
the higher order 27 bits and the characteristic, is in double extension 
form in A. At the conclusion of the operation (i.e., control transferred 
to F-j), the initial operands uro found undisturbed in their original lo¬ 
cations U', and U' + 1, and V', V' + 1. 

The coding of the routine, pages 5 through 9 , is in two forms; 
the address in the left-hand column is relative to 1000,- and the right- 
hand code is in RECO form. 

The routine is divided into six subroutines, ready for RECO 
assembly. The regional assignments are given below. 
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SA: addition and subtraction 

MF: multiplication 

DV: division 

DC: decoder end unpacking 

RF: rounding and packing 

CS: constants and temporary storage 

i 

A jump insti-uction at F 2 transfers control to 1000 (DCO), which 
initiates decoding, i.o., determines which arithmetic operation is to be 
performed, and unpacks the normalized, packed operands. DCO is the abso- 
l\:te location of the first instruction of the decoding section. A jump 
is then made to the desired subroutine (SA, KF, DV) to perform the arith¬ 
metic operation. The rounding and packing subroutine (RF) performs a 
rounding operation and truncation at the 63rd bit of the mantissa and nor¬ 
malises, and packs the resuits which are then stored in A and Q. Control 
is now transferred to F-j, which contains a jump instruction to the address 
following the initiating Interpret instruction. 

Ur-a of the Routine 


If the six subroutines discussed above are to be RECO assembled, 
the individual subroutine regions must be labeied SA, KP, DV, DC, RP and 
CS. These may be piaced, individually, anywhere in the memory that is de¬ 
sired; or, the entire routine, coded relative to 1C00, may be address- 
modified to be placed as one package anywhere in the memory. 

The routine does not set up F-] or F 2 ; these must be preset by the 
user and should be set up as follows: 

: MJ 0 | ol 

F 2 ; W 0 1000 (or DCO) 

The Interpret instruction modifies the v address of F-j; and 
Fo are not modified in any way by ihe routine. 

If we let U' and V' represent the storage of the two operands, 
these each being separated into two locations, u , Ug and v^, v 0 it must 
be remembered that u-j and u-> must be consecutive as are v- and v^. U' 
and V* need not be consecutive. 

Example: 

Compute (.a - b): a is stored at 00500 and 00501, und 

b at 02100 and 02101. The proper Interpret instruction would be 

1436 C 5 OO 2100. Note : Drum addresses cannot be used. 

A' arm and Excess Considerations 


The characteristic C, equal to v t 128 as stated above, cannot 
e.-.ceed certain limit-'. Results which yield biased characteristics greater 
than 255 or loss than zero cannot be expressed; consequently, alarms and/or 
procedures have been incorporated in the routine to indicate when these 
limits have been exceeded. 
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If the characteristic of the result is C 5 0 or C >-255, r-eroa 
are entered in the result locations and control transferred to F^. If 
Instead of having zeros entered into the result and control transferred 
to F«, it is desired to have an alarm or error exit under those extremes, 
two instructions, 1203 (RF52) and 12.12 (RF6l), must be changed. These two 
instructions normally read 

RF52 : KuJ 0 RP55 

RP 61 : SJ RF55 RP53 

These must be altered to read 

RF52 : KJ 0 C 

♦ 

RP61 : SJ d RP53, 

where C is any specified (by the user) cell to jump to in case of the above 
extreme condition. Note : If it is c venient to have results equal to zero 
in case the characteristic C becomes less than zero and have an alarm only 
for C 1>255, RF52 is the only cell that need bo altered. 

If an attempt i3 made to divide by zero the operation is by-passed, 
control is transferred back to F„, but the computer is halted by the instruc¬ 
tion DV51, which normal1y reads K3 0 0. This ir truction may be altered to 

provide any needed divide-error indication or exit. 

Since no check is made on the validity (correctness of format) of 
the input operands, use of incorrect operards will result in either an error 
indication or nonsensical answers. 
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Absolute 

Address 


Relative 

Address 



Remarks 

1000 

11 

01117 

31000 

TF 

CS 36 

Q 

DCO 

Decode S, R, Enter 

1001 

53 

00000 

32000 

OS 

0 

A 




1002 

34 

01102 

00017 

SS 

CS 21 

17 




1003 

15 

32000 

01007 

TU 

A 

DC 7 




1004 

15 

32000 

01015 

TU 

A 

DC 15 




1005 

15 

32000 

01033 

TU 

A 

DC 33 




1006 

11 

01115 

31000 

TP 

CS 34 

0 




1007 

53 

00000 

32000, 

OS 

0 

A 




1010 

54 

32000 

00003 

LA 

A 

3 



^Determine location 

1011 

15 

32000 

01022 

TU 

A 

DC 22 



'of Operands 

1012 

32 

01104 

OOOOO 

SA 

CS 23 

' 0 




1013 

15 

32000 

01023 

TU 

A 

DC 23 




1014 

11 

01116 

31000 

TP 

CS 35 

0 




1015 

53 

00000 

32000 

QS 

0 

A 




1016 

54 

32000 

00017 

LA 

A 

17 




1017 

15 

32000 

01024 

TU 

11 

DC 24 




1020 

32 

01104 

OOOOO 

SA 

CS 23 

0 




1021 

15 

32000 

01025 

TU 

A 

DC 25 

— 

— 


1022 

11 

00000 

01061 

TF 

0 

CS 0 


1 


1023 

11 

00000 

01062 

TP 

0 

CS 1 




1024 

11 

00000 

01063 

TP 

0 

CS 2 



Move Operands to 

1025 

11 
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01064 

TP 

0 

CS 3 



> Temporary Storage 

1026 

11 

01061 

01065 

TP 

CS 0 

CS 4 




1027 

11 

01062 

01066 

TP 

CS 1 

CS 5 

— 

_- 
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45 
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MJ 

0 

DC 31 



1031 

45 

ooooo 

01040 

MJ 

0 

DC 40 



1032 

11 

01120 

31000 

TP 

CS 37 
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53 
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32000 

QS 

0 

A 




1034 
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01122 

01220 

EJ 

CS 41 

SA 2 
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1035 

43 

01123 

01216 

EJ 

cs 42 

SA 0 




1036 

43 

01124 

01313 

EJ 

CS 43 

MP 0 




1037 

45 
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01340 

MJ 

0 

DV 0 

— 



1040 

11 

01061 

32000 

TP 

cs 0 

A 

— 

— - 


1041 

22 

00011 

01075 

I.T 

00011 

cs 14 




1042 

46 

01043 

01044 

SJ 

DC 43 

DC 44 




1043 

13 

01075 

01075 

TN 

CS 14 

CS 14 




1044 

22 

10033 

01067 

LT 

10033 

CS 6 




1045 

11 

01060 

31000 

TP 

DC 60 

0 




1046 

53 

01061 

01067 

QS 

CS 0 

CS 6 




1047 

22 

31000 

01061 

IT 

31000 

CS 0 




1050 

11 

01063 

32000 

TP 

CS 2 

A 
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1051 

22 
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01076 

LT 

00011 

cs 15 
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46 

01053 

01054 

SJ 

DC 53 

DC 54 
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13 

01076 

01076 

TN 

CS 15 

CS 15 
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22 

10033 

01067 

LT 

10033 

CS 6 




1055 

53 

01063 

01067 

OS 

CS 2 

CS 6 




1056 

22 

31000 

01063 

I.T 

31000 

CS 2 




1057 

45 

OOOOO 

01032 

MJ 

0 

DC 32 


_ 


1060 

00 

77777 

77777 

00 

77777 

77777 

DC 

60 

1061 

00 

. OOOOO 

OOOOO 

0 

0 

0 

CS 

0 


1062 

00 

OOOOO 

OOOOO 

0 

0 

0 




1063 

00 

OOOOO 

OOOOb 

0 

0 

0 




1064 

00 

000< ) 

OOOOO 

0 

0 

0 




1065 

00 

OOOOO 

OOOOO 

0 

0 

0 
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1066 

00 
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1067 
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0 
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0 
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00000 

00000 
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0 

1 
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0 
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00 

00000 

00000 
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0 
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00000 
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J 
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00 
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00001 

00 

00000 

0C001 
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1103 

00 
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00400 

00 
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00400 



1104 

00 

00001 

00000 

00 

00001 

00000 



1105 

00 

00000 

00034 

00 
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00034 



1106 

00 

00000 

00044 

00 

00000 

00044 



1107 

00 

00000 

00076 

00 

00000 

00076 



1110 

00 

00000 

00100 

00 
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00100 



1111 

00 

coooo 

00144 

00 

00000 

00144 



1112 

CO 
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00200 

00 

00000 

00200 



1113 

00 
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CO 

00000 
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1114 
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00400 

00 

00000 

00400 



1115 

00 

00777 
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00 
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1116 

00 
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07777 

00 

00000 

07777 


1 

1117 

00 

00000 

77777 

00 

00000 

77777 



1120 

00 

77000 

00000 

CO 

77000 

OOCOO 



1121 

37 

70000 

OOCOO 

37 

70000 

00000 



1122 

00 

35000 

00000 

00 

35000 

00000 



1123 

00 

36000 

00000 

00 

36000 

00000 



1124 

00 

71000 

oooco 

00 

71000 

00000 

J 


1125 

00 

oooco 

01157 

0 

0 

RP 26 


1 

1126 

00 
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01176 

0 

0 

RP 45 

I 
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1127 

GO 

oooco 

01133 

0 

0 

RP 2 

_J 


1130 

00 

00000 

00043 

00 

00000 

00043 

CS 47 

1131 

16 

01125 

01156 

TV 

CS 44 

RP 25 

RP 0. 

Add Round and Pack Enter 

1132 

45 

oooco 

01134 

MJ 

0 

RP 3 


1133 

16 

01126 

01156 

TV 

CS 45 

RP 25 

Multiply Round and Pack Enter 

1134 

47 

01135 

01206 

ZJ 

RT 4 

RP 55 

Zero Test 

1135 

74 

32000 

01073 

SF 

A 

CS 12 

> 


1136 

54 

32000 

00044 

LA 

A 

44 



1137 

46 

01142 

01140 

SJ 

RP 11 

RP 7 



1140 

32 

01103 

00000 

SA 

CS 22 

0 



1141 

46 

01147 

01144 

SJ 

RP 16 

RP 13 


>Rounding 

1142 

36 

01103 

32000 

• ST 

CS 22 

A 


f 

1143 

46 

01144 

0.147 

SJ 

RP 13 

RP 16 



1144 

11 

01101 

01074 

TP 

CS 20 

CS 13 

1 


1145 

54 

32000 

00001 

LA 

A 

1 



1146 

45 

00000 

01150 

MJ 

0 

RP 17 



1147 

13 

01102 

01074 

TN 

CS 21 

CS 13 



1150 

22 

C0033 

01070 

IT 

00033 

CS 7 

"j 

| 

1151 

22 

10001 

32000 

LT 

10001 

A 



1152 

22 

00043 

01067 

IT 

00043 

CS 6 



1153 

22 

00000 

32000 

LT 

00000 

A 


►Truncation 

1154 

27 

01070 

01101 

CC 

CS 7 

CS 20 



1155 

22 

00043 

01070 

LT 

00043 

CS 7 



1156 

45 

OOOCO 

OOOCO 

MJ 

0 

0 

■■ ■ * 
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1157 

31 

01073 

00000 

SP 

CS 12 

0 




1160 

35 

01074 

32000 

AT 

CS 13 

A 

1 



1161 

42 

01106 

01165 

TJ 

CS 25 

RP 34 




1162 

32 

01075 

00000 

SA 

CS 14 

0 




1163 

34 

01111 

00000 

SS 

CS 30 

0 


>Add Characteristic 

1164 

45 

00000 

01211 

MJ 

0 

RP 51 




1165 

35 

01075 

32000 

AT 

CS 14 

A 




1166 

36 

01105 

32000 

ST 

CS 24 

A 




1167 

45 

00000 

01202 

MJ 

0 

RP 51 

_ J 



1170 

11 

01067 

32000 

Tp 

CS 6 

A 

— 



1171 

46 

01172 

01173 

SJ 

HP 41 

RP 42 




1172 

13 

01077 

01077 

TN 

C3 16 

CS 16 


^Packing 


1173 

11 

01121 

31000 

TP 

cs 40 

Q 




1174 

53 

01077 

01067 

03 

CS 16 

CS 6 

_J 



1175 

45 

00000 

01213 

MJ 

0 

RP 62 




1176 

31 

01075 

00000 

SP 

CS 14 

0 




1177 

32 

01076 

00000 

SA 

CS 15 

0 
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1200 

34 

01112 

00000 

S3 

CS 31 

0 




1201 

32 

01074 

00000 

SA 

CS 13 

0 

__ j 



1202 

42 

01114 

01211 

TJ 

CS 33 

RP 60 

1 

'Char. Overflow Test 

1203 

45 

00000 

01206 

MJ 

0 

RT 55 

J 

r 


1204 

22 

10033 

01077 

IT 
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CS 16 




1205 

45 
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01170 

MJ 

0 

RP 37 




1206 

11 

01101 

01067 

T p 

CS 20 

CS 6 

' 1 
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11 

01101 

01070 

TP 
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CS 7 

J 



1210 

45 
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01213 

MJ 

0 

RP 62 
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11 
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32000 

TP 

A 

A 

1 

, Ohar. Uverilow lest 
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46 

01206 

01204 

SJ 
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RP 53 

J 

r 
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11 

01067 

32000 

p 

CS 6 

A 
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A 

1214 

11 

01070 

31000 

TP 

CS 7 

Q 

Move Answer to 

Q 

1215 

45 

00000 
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MJ 

0 

0 

RP 64 



1216 

13 

01063 

01063 

TN 

CS 2 

CS 2 

SA 0. 

Subtract S.R. Enter 

1217 

13 

01064 

01064 

TN 

CS 3 

CS 3 




1220 

11 

01075 

32000 

Tr 

as 14 

A 

Add S. 

R. Enter 

1221 

36 

01076 

32000 

ST 

CS 15 

A 




1222 

46 

01223 

01235 

SJ 

SA 5 

SA 17 

1 



1223 

11 

01061 

31000 

TP 

CS 0 

Q 




1224 

11 

01063 

01061 

TP 

CS 2 

CS 0 




1225 

11 

31000 

01063 

TP 

Q 

CS 2 




1226 

11 

01C62 

31000 

T p 

CS 1 

Q 


1 Reverse Operands So 

1227 

11 

01064 

01062 

TP 

CS 3 

CS 1 


(One With Larger 

1230 

11 

31000 

01064 

TP 

Q 

CS 3 
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1231 

11 

01075 

31000 

TP 

CS 14 

Q 


! i.e., 


1232 

11 

01076 

01075 

TP 

CS 15 

CS 14 
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1233 

11 

31000 

01076 

TP 

Q 

CS 15 
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13 

32000 

32000 

TN 

A 

A 




1235 

11 

32000 

01100 

TP 

A 

CS 17 




1236 

42 

01107 

01250 

TJ 

CS 26 

SA 32 

- 1 

| 


1237 

11 

01062 

01070 

TP 

CS 1 

CS 7 




1240 

11 

01061 

32000 

TP 

CS 0 

A 




1241 

46 

01242 

01243 

SJ 

SA 24 

SA 25 
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l 
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13 

01075 
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CS 14 

cs 14 
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01067 

TP 
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11 
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TP 

cs 40 

Q 
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54 

01075 

00033 

LA 

CS 14 
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1246 

53 

01075 

01067 

Q3 

cs 14 

CS 6 




1247 

45 

00000 

01213 

MJ 

0 

RP 62 
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1250 

11 

01100 

32000 

Tr 

CS 17 

A 

1251 

43 

01106 

01264 

FJ 

C3 25 

SA 46 

1252 

42 

01106 

01264 

TJ 

CS 25 

SA 46 

1253 

11 

01106 

32000 

TP 

CS 25 

A 

1254 

35 

01130 

32000 

AT 

CS 47 

A 

1255 

36 

01100 

32000 

ST 

CS 17 

A 

1256 

16 

32000 

01260 

TV 

A 

SA 42 

1257 

11 

01003 

32000 

TP 

CS 2 

A 

1260 

54 

320,0 

00000 

I. A 

A 

0 

1261 

22 

00000 

01070 

LT 

00000 

CS 7 

1262 

23 

01067 

01067 

RS 

CS 6 

CS 6 

1263 

45 

oooco 

01304 

MJ 

0 

SA 66 

1264 

11 

01106 

32000 

TP 

CS 25 

A 

1265 

36 

01100 

32000 

ST 

CS 17 

A 

1266 

16 

32000 

01272 

yv 

A 

SA 54 
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35 
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AT 
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A 

1270 

16 
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11 
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CS 2 
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AT 
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54 
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LA 

A 
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54 

32000 
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LA 

A 
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22 

310C0 
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LT 

31000 

Q 
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01063 
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TP 

CS 2 
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CG 
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1303 

22 

00043 

01070 

LT 
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AT 
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54 
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LA 

A 

43 

1307 

35 

01062 
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AT 

CS 1 

A 

1310 

35 

01070 

32000 

AT 

CS 7 
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1311 

54 
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LA 

A 

1 

1312 

45 

0GCC0 

01131 

MJ 

0 

RP 0 
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11 

01061 

32000 

TP 

CS 0 

A 

1314 

47 

01315 

01206 

ZJ 

K? 7 

RF 55 

1315 

11 

01063 

32000 
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CS 2 

A 

1316 

47 

01317 

01206 
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MP 4 

HP 55 

1317 

16 

01127 

01337 

TV 

CS 46 

KP 24 

1320 

11 

01061 

01065 

TP 

CS 0 

CS 4 

1321 

11 

01062 

01066 

TP 

CS 1 

CS 5 
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• 
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01064 

HP 

CS 5 

CS 3 
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22 

OOOCO 

32000 
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A 
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22 
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LT 

06013 
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MP 

CS 4 
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01066 

V 

CS 2 

CS 5 
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LT 

00001 
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MP 
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A 
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